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IDENTIFICATION 


PRODUCT CODE:  AC=9494(-M( 

PRODUCT NAME : CZVSDCO VS60 VIS DSPLY TS? 
DATE: MAY 1979 

MAINTAINER: DIAGNOSTIC ENGINEERING 


COPYRIGHT (C) 1976, 1979 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY 


SINGLE C 
THE INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS 
SOFTWARE, OR ANY OTHER COPIES THEREOF, MAY NOT BE RO- 
VIDED OR OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON 
EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO 
THESE LICENSE TERMS. TITLE TO AND OWNERSHIP OF THE 
SCFTWARE SHALL AT ALL TIMES REMAIN IN DEC. 


THE INFORMATION IN THIS er IS SUBJECT TO CHANGE 
WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COM- 
MITMENT BY DIGITAL EQUIPMENT CORPORATION. 


DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY 
Senne SOF TWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY 
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ABSTRACT 


keatekeee REY B exeeekee 


DYNAMIC EXTERNAL STOP FRAME (W/27) IS DEPENDANT ON 

HARDWAREECO'S (M7058 #5, M7054 #4 AND VT48 #7). 

keekkeee REY ( weekanne s 
FIXES KEYBOARD SELECTION HACK AND EXPANDS THE 

DYNAMIC OFFSET FRAME. 


ARRAS AAARSAAS ALARA LS SS DG 


THE PROGRAM PROVIDES THE OPERATOR WITH TWENTY TWO VISUAL FRAMES -— -~ 
TO VERIFY THE OPERATION OF THE VS60 DISPLAY SYSTEM. 

NORMALLY EACH FRAME viel CYCLE FOR ABOUT 5 SECONDS BEFORE 

ADVANCING TO THE NEXT FRAME. EACH VISUAL FRAME CAN BE SELECTED 

VIA SWITCH REGISTER OR KEYBOARD SELECTION. = 


REQUIREMENTS 


EQUIPMENT 


A. PDP-11 COMPUTER WITH AT LEAST 12k OF MEMORY. 
6B. 1/0 TERMINAL (I.E. ASR33 TTY OR LK4O). 

C. VS-60 DISPLAY System 

D. ADDITIONAL VS-60 DISPLAY CONSOLE (OPTIONAL). 


STORAGE 


THE PROGRAM OCCUPIES THE LOWER 8k vs MEMORY BUT 
REQUIRES 12K (BUFFER SPACE) TO RUN 


LOADING PROCEDURE 


NORMAL PROCEDURE FOR LOADING A BINARY PROGRAM INTO MEMORY SHOULD 
BE FOLLOWED. 


STARTING PROCEDURE 


LOAD ADDRESS 200 AND START TO INITIALIZE THE SYSTEM 
AND BEGIN TESTING. 


SWITCH REGISTER CONTROL 


=1 LOOP ON CURRENT TEST 
SWO9=1 STOP SUB-PICTURE MOTION 
=1 LOOP ON TEST IN SWR<4:0> 
=1 ENABLE KEYBOARD CONTROL (REF.5.2) 


SEQ 0003 


KE YBOARD CONTROL 


STARTING THE TEST WITH SR7=1 WILL ENABLE KEYBOARD CONTROL. 

KEYBOARD CONTROL IS AN AUXILIARY METHOD OF SELECTING THE TEST FRAME, 
LOOP ON A TEST FRAME, OR STOP=START FRAME MOTION. THE SWITCH REGISTER 
BITS OVERRIDE THE KEYBOARD CONTROL 


THE DIRECTORY FRAME PROVIDES THE OPERATOR WITH THE KEYBOARD pit 
AND SWITCH REGISTER VALUE FOR EACH TEST PATTERN. TO SELECT A TEST 
PATTERN, SIMPLY DEPRESS THE TEST LETTER ON THE CONSOLE KEYBOARD. 
DEPRESS THE ‘RUB-OUT'' KEY TO LOOP ON THE CURRENT TEST PATTERN. 

DEPRESS THE ‘‘CR'’ KEY TO STOP MOTION. UNDEFINED TEST LETTERS WILL 
DISPLAY THE DIRECTORY FRAME. ALL OTHERS WILL HAVE NO EFFECT OTHER THAN 
TO RESUME PICTURE MOTION. 





6.9 ERROR REPORTING 


THE PROGRAM ONLY DISPLAYS VISUAL ERRORS AND DOES NOT REPORT ANY LOGIC ERRORS. 
7.0 MISCELLANEOUS 


7.1 VS60 BUS/VECTOR/PRIORITY ADDRESS MODIFICATION 


MODIFY LOCATION 1242 ($VECT1) IF BASE VECTOR ADDRESS IS NOT 100320. 
MODIFY LOCATION 1246 ($BASE) IF BASE BUS ADDRESS IS NOT 172000. 


NOTE: A RESTART IS REQUIRED AFTER THE ABOVE ADDRESS MODIFICATION. 
17.2 XXDP/APT NOTES 

THE VISUAL TEST IS CHAINABLE UNDER XXDP IF 16K OR GREATER MEMORY IS AVAILABLE. 
THE VISUAL TEST INCLUDES THE "APT" SOFTWARE HOOKS, HOWEVER 
THEY HAVE NOT BEEN TESTED. 

7.3 POWER FAIL 
A POWER FAILURE WILL CAUSE THE PROGRAM TO BE RESTARTED. 

7.4 SINGLE VS60 TESTING 
THE VISUAL TEST DOES NOT TEST MULTIPLE VS60'S 
THE VISUAL TEST WILL UTILIZE THE SECOND CONSOLE IF CONNECTED. 


THE ‘‘A’’ AND *'U'" FRAMES ARE USED TO VERIFY PROPER OPERATION 
BE TWEEN THE TWO DISPLAY CONSOLES. 


A TIER 






EXECUTION TIME 


EXECUTION TIME IS APPROX. FOUR MIN. AN ‘END OF PASS'' IS _ INDICATED 
BY A RETURN TO THE DIRECTORY FRAME. NO ‘END OF PASS’ MESSAGE IS TYPED. 


PROGRAM TEST DESCRIPTIONS 


The sub-picture supplies the cperator with a List of the 
Different Visual frames for his inspection. 


This frame also includes a list of switch register values and 
keyboarc control letters to select the visual frames. When a 
non-valid switch register value or keyboard key has been 
selected, the eereerere frame will be displayed. IF THE SECOND 
CONSOLE IS CONNECTED, THE GPERATOR SHOULD VERIFY THE 
"THIS IS CONSOLE 0°* MESSAGE ON CONSOLE #0 AND THE 
“THIS IS CONSOLE 1°° MESSAGE ON CONSOLE 41. 
The frame is displayed by doing the following: 

1. Point to x = 0 vy = 1500 

2. Enable console 1 intensity 

3. Enter ‘‘character'’’ mode and display inline text. 

4. Display ‘’STOP’' 


5. Display ‘JUMP ABSOLUTE’ to the start of the frame. 


AstigMatism and Settling Time Frame 


The frame will display points at individual bits at each x and 
y position register. 


A floating one pattern used on each resister followed by an 
accumulation pattern. 


Bit 9 of ~ pos. Bit 9o 
Bit 8 of x pos. Bit 9o 
etc. etc. 


Bits 9 and 8 of x pos. Bits 9 and 8 of y pos. 
etc. etc. 
























C = 03 Short Term Drift Frame 


The frame will display five points. The points will be 
displayed in each corner and the center of the screen. Each 
point actually consists of four ‘Display Point’’ instructions. 


The point is generated by: 
1. Positioning the x and y DAC at a coordinate. 
2. IntensifYing the cordinate ONCE. 


3. Do not intensify the point again for five (5) 
milliseconds. 


4. Repeat 2 and 3 three more times. 


5. If all the cordinates have not been displayed, update 
the cordinate and rePEAT 1 thru 4. 


The C.P.U. cycle time is a factor in the 5 msec. delay 
routine. The current delay value (location ‘DELAY'’) is valid 
for a PDP=-11/40 CPU type. 


D = 04 Minor Axis Gain, Offset and Phase Frame 


The frame consists of three square boxes with diagonal 
bisecting lines. The largest box encompASses the whole main 
screen viewing area. The second box, whose size is 100., is 
displayed in the right center area. The third box, whose size 
is 10., is below the second box. The boxes are drawn counter 
clockwise from the lower left corner. Upon completion the 
procedure is reversed and drawn clockwise from the lower left 
corner. | When drawing the clockwise box the ‘Negative’’ 
polarity bit is set to enable adjustment of the ‘Offset pot. 
Each box, upon completion, is segmented by a diagonal line 
from lower left to upper right and lower right to upper left 
ocorner. The frame also draws the same type box in the ‘menu’ 
area. Because the ‘menu’’ is narrower than the high, the 
result is an rectangle in the menu area. In the lower center 
area, a series of four vectors 200 units long, are drawn from 
a common point. In the left center quadrant, ten vectors are 
drawn using ‘‘SHORT VECTOR’’ mode. Each of the vectors have a 





1 
length of be yt units. After drawing the vector a ‘RELATIVE 
POINT’ is displayed two units away from the end of the vector. SEQ 0007 
The ‘‘Y'* coordinate is updated by two units and the ‘‘SHORT 
VECTOR'’ and "RELATIVE POINT" sequence is repeated. The visual 
result is a vertical ‘DOT-DASH"’ Line. Included in the left 
quadrant is the Intensity Delay sub =picture. Eight vectors 
are drawn away from a ‘‘COMMON POINT’’ offset by ONE unit. The 
result will appear to be a square formed by the_ starting 
points of the vectors. Each vector has a length of 40 units. 


VECTOR ORIGINATES AT 
a x Y 


1 0354 1003 
e 0354 1004 
3 0353 1004 
4 0352 1004 
5 0352 1003 
6 0352 1002 
7 0353 1002 
8 0354 1002 


—E = 05 Major Axis Offset and Vector Start Frame 


The frame includes the minor axis gain frame plus two 
additional patterns. The first is used to adjust the vector 
starting point. . The second pattern to adjust 

the major axis offset. The first pattern is 

drawn, in the upper quadrant, with the following manNEr: 


Vector # Direction 
1 Positive Vertical Reference Vector. 
2 Positive Horizontal Vector starting on VECTOR #1 
3 Positive Horizontal Vector starting 1 unit RIGHT OF VECTOR #1 
4 Negative Horizontal Vector starting cn VECTOR #1 
5 Negative Horizontal Vector starting 1 unit LEFT OF VECTOR #1 
6 Positive Horizontai Vector start at the BOTTOM OF VECTOR #1 
7 Negative Vertical Vector starting at the bottom OF VECTOR #1 
8 Negative Horizontal Vector starting at the BOTTOM OF VECTOR #1 


The second pattern draws, from a common point (x=1000, y=400). 

four. pairs of vectors. The first of each palR is drawn with 

the ‘YY’ axis being the major value. With the second using the 

"x'* as the major. THE THIRD PATTERN CONSCISTS OF 10 PAIRS OF SHORT 

LENGTH VECTORS AND RELATIVE POINT'S DRAWN IN THE LEFT CENTER AREA 

AN 8 UNIT SHORT VERTICAL VECTOR IS DRAWN FOLLOWED BY A ONE UNIT RELATIVE POINT. 





























fF = 06 Vector Length Gain, Convergence and Vector Linearity Frame 


SEQ 0008 


The pattern appears to be a series of herizontai lines being 
intersected by a diagonal Line from upper left to lower right. 


The picture is drawn by: 


1, Draw an outer reference box ; : ; 

2. Starting from maximum, draw aN increasing negative 
Length vector from an increasing ‘'y’’ origin. 

3. neha from minimum x, draw a decreasing length 
vector from an prslng "y" origin. — : 

4. Starting in the upper left edge, intensify a point at 
the intersection of #2 to #3 vector. g ; 

5S. Starting in the upper left edge, intensify a 
decending vector that is over #4. 

6. From center screen, using ‘BASIC’’ Vectors draw two 


intersecting ‘‘x'’ and ‘'y’’ Lines. 


G = 07 Pincushion Frame 


Using the ‘LONG’ Vector instruction, display a ‘‘CROSS HATCH" 
visual pattern. The frame can be used to detect distortion in 
Vectors. From a distance of three feet, all vectors should 
appear straight with no vector curvature. 


H = 10 OctagonS AND CIRCLES Frame 


The purpose of the frame is to verify the endpoint matching of 
vectors. FIVE octagons are drawn from the center of the 
screen. The outer most octagon is drawn % using the 
““ABSOLUTE VECTOR’’ instruction from the point x = 530 y = 10. 


Vector @ from x~y to x~y 


Vector 1 

Vector 2 

Vector 3 

Vector 4 from 1770-1250 to 1250-1770 
Vector 5 

Vector 6 

Vector 7 

Vector 8 from 10-530 to 530-10 


The FOUR concentric octagons are drawn by__using the ‘LONG 
VECTOR’* display instruction. The sizes are 377,177,77,7 

respectively. Two more octagons with a size of 17 units are 

drawn at x = 300 is 1000 an x = 1500 y = 1000. These two are 

drawn aie the ‘BASIC SHORT'’ vector display instruction. 

THREE CONCENTRIC CIRCLES ARE DRAWN USING ABSOLUTE VECTOR MODE. 

EACH CIRCLE CONSCISTS OF 45. ABSOLUTE VECTORS. THE THREE CIRCLES HAVE 
A RADIUS OF 64., 128., AND 256. RESPECTIVELY. 


SEQ 0009 
1 = 11 Scissoring and Vector Scaling Frame 


The frame starts out by displaying a reference box around 
edge of the screen. 


A VECTOR IS DRAWN FROM AN ‘ON-SCREEN’ POSITION TO AN ‘OFF=SCREEN'’’ 
POSITION. Another vector is drawn fromthe end of the 
previous vector back into the viewing area. This is repeated 
four times on each screen edge. The vectors should all 
terminate WITH NO bending or distortion. After all edges have 
been intersected, draw a large diamond that intersects each 
edge. The diamond and the vectors crossing the edges are the 
standard vector length. To verify that vector scale operates 
proPerly, draw a square in the center of the screen. By 
changing the value of the ‘Vector Scale’’ ps Hanne the box 
should increase in size. the vector scale is changed. 
with the resulting picture being sixteen scaled boxes in the 
center of the screen. 


J = 12 X and Y Dynamic Offset Frame 


IN THIS FRAME, A 1000 UNIT BOX IS DRAWN IN THE CENTER 
OF THE SCREEN. USING THE DISPLAY ‘OFFSET’’ INSTRUCTION, 
THE BOX IS MADE TO SLIDE ACROSS THE SCREEN TO THE RIGHT, 
THEN TO THE LEFT, TOP, AND BOTTOM EDGES. 

AFTER THESE FOUR MOTIONS THE BOX IS RETURNED TO CENTER 
AND MOVED DIAGONNALY TO THE UPPER RIGHT, AND LOWER LEFT 
BY SETTING THE OFFSET REGISTERS DIRECTLY FROM THE CPU 
CEXTERNAL TO THE DISPLAY FILE). 

THE RANGE OF OFFSET USED IS 0 TO 1400 (POS AND NEG) IN 
BOTH CASES. 


K = 13 Character Scale Frame 


The frame function is to vert ty that character scale does 
change the size. To verify character scale, six characters, 
(the letters A, B, F, 0, T and X) are displayed. each 
character startS with the largest to the smallest size ona 
common base line. A horizontal reference is drawn along the 
base of the characters. 


= 14 Character Quality and Character Rotate Frame 


= 15 


In this frame the message "The quick brown fox jumped over the 
lazy dogs'' is displayed over the entire screen. By displayin 
the full screen of c ggg Be: the quality and distortion o 
the characters 5; checked. Also included in the frame 
are rotated CHARACTERS. The rotated characters are displayed 
in the menu area. 


Character Set, Superscript, Subscript and Italic Frame 


The frame displays all the displayable characters, special, 
italic, superscript and rngag F! At The first line consists of 
upper case letter (codes 100-137) and italic uppercase 
letters. The second Line contains lower case letters (codes 
140-177) and italic lower case letters. The third Line 
contains numbers and punctuation (codes 40-77) and italic 

rs and puncTuation. the fourth Line contains the special 
characters and italic special characters. These fouR lines are 
repeated in the lower half of the screen. Near the center of 
the screen a horizontal reference line is displayed. 


The largest character scale is enabled and the letter ‘€'’ jis 
displayed. This should. , appear on the base reference Line. 
The code ‘‘super-script on’’ is enabled, followed by another 


The procedure is repeated three times with the result being 
four letter’'s of ‘Et’ with each “it a reduced size and aN 
ascending y position. To verif e ‘s uperscript~off"' 
function, the code ‘'super-script oft" fol Lowed by an ASCII ‘E 
is sent. The procedure is repeated three times with the 
character increasing in size and decending in the y position. 


The Last ‘E*’ should be on the base reference line. The same 
procedure is repeated oe the “‘subscript-on'’ and 
‘subscript-off'’ codes except e characters should first 
decend with reducing in size followed by ascending and 

increasing in character size. 


SEQ 0010 





N= 16 Sync Speed and Character Terminate Frame 


The patterns serves two FUNCTIONS. The first is to test 
character terminate. A diamond is displayed in the 

center of the screen with a message about the '‘'SYNC’’ speed. 
The message jis terminated by the value of '177' (a full dot 
matrix character). 


The code #177 is loaded into the character terminate register 
+e De apis ye! terminate (character string escape) function is 
ena ° 


The diamond is displayed — the ‘BASIC Vector’' instruction. 
The message is displayed by entering "‘character'’’ mode and 
doing a ‘display JSR’’ to the ASCII eee. The text should be 
displayed and a ‘display POP and RESTORE’ should occur after 
the code #177 is displayed. If ‘character terminate” fails to 
oy at a DIFFERENT message will be displayed reporting 


The second eek gon | is to verify a visual change in the picture 
intensity when using NO SYNC, 40 cps sync and 30 cps sync. 


The displayed message will indicate the different sync speeds. 


When no sync is enabled the frame will appear bright and will 
have no flicker. When a sync speed of 40 is enabled, the 
frame will become dim. Upon selection of a 7 speed of 30, 
the frame should appear to flicker. In each case, the frame 
appears different for each sync speed. 


Dash Lines and Blink Frame 


This is a frame dedicated to the different line types and the 
ability to generate a blinking element. The type of Line 
followed by two vectors of the same line type are displayed. 
The first is without blink enabled and the second is displayed 
with blink enabled. Visually the type of line is displayed 
followed by a non blinking Line of the type followed by a 
=e Line of the type. This frame also used a ‘Display 
jump relative to loop’’ on the frame. 


SEQ 0011 


SEQ 0012 
P = 20 Vector Length (Spray) Frame 


The frame consists of ‘‘ABSOLUTE’’ vectors drawn from point zs 
to another x,y point and a return vector to point 0,0. 
first vector is drawn from point 0,0 to the maximum x and a “ 
position of 1. Then a INVISIBLE vector to 0,0 is drawn. The 
third vector is drawn from point 0,0 to the maximum x and a 
sition of 3. This is i vey x until the maximum y position 
as been dispiayed(45 DEG.). At that point the sequence is reversed 
IN that the x is the adjusted end point. The vector is drawn 
from point 0,0 to a value of x and the maximum value of y. 
reference x and y vector is drawn at the right and top edge of 
the main screen. Each vector should terminate on 
the reference Line. Even spacing should exist between the end 
of each vector. EVERY OTHER VECTOR WILL BE DISPLAYED. 


Horizontal Phosphor Frame 


In this frame, a reference box around the main screen 
perimeter is displayed. A band of intensified vectors are 
drawn to enable the operator to inspect phosphor surface. The 
band uses the ‘BASIC Vector’’ instruction by going the full 
value of y (path 2), delta x of 2 units oe negative full 
value of y (path 6) and a delta x of 2 units. This is 
repeated 50 times. The origin point of the band is updated 
via_ the ‘Point’’ instruction. The number of times the band is 
displayed before moving to the next f qoarknen is controlled by 
the number loaded into the ‘'TEMPA' 


Vertical Phosphor Frame 


In this frame, a reference box around the main screen and menu 
perimeter is displayed. A_ band of intensified vectors are 
drawn thru the main screen and the menu screen to enable the 
rator to inspect the phosphor surface. The band uses 
SIC Vector’’ instruction by gens the full value of x (path 
0), delta y of 2 units (path 2). negative full a a of x 
(path 4), and a delta y of 2 wunits. his is repeated 
times. THE PROCESS IS THEN “teh AGAIN IN THE MENU AREA EXCEPT 
USING THE MAXIUM X MENU LENGTH (177). 
The origin point of the ha is updated via the 
*Point’’ instruction. The number of times the band is 
eeoteves before moving to the ad positien is controlled by 
he number loaded into the ‘TEMP 





23 Short Vector and Relative Point Frame 


with this frame the operator can verify the correct selection 
of Relative point and short vectors. Four octagons are drawn 
in the four quadrants of the screen. Each octagon consists | 
of an outer octagon drawn using oe me, a * vector’’ 


instruction. Within each major octagon 2 TAGOR. 
ints at the _ intersecti vectors THE MAJOR Ot TA 


he ‘Relative point’’ instruction is used to display these points. 
A THIRD OCTAGON IS DISPLAYED USING THE ‘‘SHORT VECTOR'’ INSTRUCTION. 


GRAPHPLOT _ INCREMENT REGISTER TEST USING GRAPHPLOT X AND GRAPHPLOT Y 


THE GRAPHPLOT INCREMENT REGISTER IS VERIFIED WITH A ‘‘SINE WAVE" yh pe 
SPLAYED I LOT Y AND GRAPHPLOT 


Ss. AMOUNT OF IN 
GRAPHPLOT INCREMENT REGISTER. T 
"DISPLAY STOP'’. UPON DETECTING THE DSTOP, A COUNTER IS DECREMENTED. 
UPON EXHAUSTION OF THE COUNTER, THE GRAPHPLOT ait el REGISTER IS CHANGED. 
THE RESULT IS THE SINE x WILL APPEAR T No a THE RIGHT, 
TO THE T FOR GRAPHPL OWER 


FOR GRAPHPLOT Y OT ONLY THE L 
THREE BITS OF THE INCREMENT REGISTER ARE VERIFIED WITH THJS PATTERN. 
Intensity Level and Lightpen Frame 


The frame provides the operator with a method to visually 
check the eight different intensity levels. Points, Vectors 
and Characters are drawn using the different intensity levels. 

The frame also includes handling of ‘Light-pen’’ flags and 

“Light-Pen switches’’. An octagon is displayed in the upper 

riGht corner. Inside the octagon contain the X and Y axis 

values for the last ‘Light-Pen Hit’’. The state of the 

“Light-Pen switch’’ is also displayed within the octagon. In 

the lower right area a matrix of dots is used for a_ static 

test of the ‘Light-Pen field of View''. The intensified dots 
spaced four, units apart. When the dots are detected by 
Light-Pen’’, the dot which a hit has occurred on will not 
be displayed. Below the dot matrix is aN octal readout 
reporting the hit count total. The center of_the frame is 
bisected by a Horizontal Reference Line (Y=700). Nine 
vertical reference lines are drawn at 200 unit increments. 

The vertical lines are drawn below the Horizontal Reference 

Line are used to verify correct ‘X'' pen hit position. 

The Lower left section contains vertical spacing test. Three 
rallel vectors are drawn with decreasing vertical spacing 
tween the Lines. The lower center area consists of a 

Variable Line Length Test. Twenty horizontal lines gtes 

increasing X Length are drawn from a common X position. Both 

sections are used to test Light pen selectivity. IF THE SECOND CONSOLE 

ANT OPERATION OF HE X/Y AND PEN SWITCH 
THE ‘FIELD OF VIEW'’ AND THE ‘HIT-COUNT' 
ARE THE ONLY DEPENDANT ELEMENTS. 





Vv = 2 


10.0 


KEYBOARD CHARACTER ECHO LOOP (OPERATOR SELECT ONLY) 


eeeee TYPE <V> OR SWR = 426 TO RUN THIS FRAME «exe 


THE FRAME PROVIDES A tion oF TO VS60 SCREEN CHARACTER LOOP 
iy VERIFY PROPER OPERATION OF THE CONSOLE KEYBOARD. 

A MAXIMUM OF 1024. CHARACTERS CAN BE DISPLAYED BY THIS LOOP. 
THE OPERATOR MAY ESCAPE THE LOOP, BY oly Sang THE *'CTRL*’ 
AND ‘‘C’’ KEYS, TO , A oe TO THE DIRECTORY FRAME. 
UPON DECTECTION OF A KEYBOARD CHARACTER, THE CHARACTER'S OCTAL VALUE 
AND THE CHARACTER ARE DISPLAYED ON THE SCREEN. 


THE ‘‘SHIFT-OUT’* CODE ea BE ENTERED BY THE OPERATOR, him, THE 
PROGRAM WIL Y KEYBOARD CODES GREATER THAN 37 O 

~OUT’* MODE, THE CHARACTER DISPLAYED. FROM THE 
CURRENT CHARACTER POSITION TO THE END OF THE LINE WILL APPEAR TO 
BE AN UPSIDE DOWN ''Y’’ CHARACTER. IN THE ‘‘SHIFT-OUT'' MODE, THE 
CHARACTER DISPLAYED HAS THE VALUE OF ZERO. 


DYNAMIC EXTERNAL STOP FRAME 


xexxe THIS FRAME VERIFIES VS60 ECO'S VT48 #7, = *xxxx 
«xee® M7054 #4 AND M7058 #5 HAVE BEEN INSTALLED ***** 


THIS FRAME VERIFIES PROPER OPERATION OF THE EXTERNAL yo Mt LOGIC. 


FRAME , PU IS 
GENERATION A EXTERNAL DISPLAY STOP SIGNAL (EDSS) TO THE VS60. 
AFTER AN ‘EDSS'' HAS BEEN SENT, THE -11 WILL VERIFY THE DISPLAY PROGRAM 
oy id REGISTER TO BE WITHIN AN EXPECTED reat E ER 
"= " SHOULD CAUSE AN EXTURNAL STOP INTERR 
"EDSS"* INTERRUPT, A COUNTER IS DECREMENTED. 


THE PROGRAM WILL GO TO THE "END OF PASS"' 
* SEVEN DIFFERENT ERROR CONDITIONS WILL BE 


NO EXTERNAL STOP iNTERRUPT 

UNEXPECTED INTERRUPT TO VECTOR +4 
UNEXPECTED INTERRUPT TO VECTOR +10 
swe | INTERRUPT TO VECTOR +14 
D.P.C. OUT OF RANGE (TOO LOW) 

D. PoC. OUT OF RANGE (TOO HIGH) 
EXTERNAL STOP INTERRUPT BUT NO EXTERNAL 


PROGRAM LISTING 


SEQ 0014 
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MACY11 30G(1063) 17=SEP=79 08:50 PAGE 1 


- TITLE CZvSDC VS60 VISUAL DISPLAY TEST 
;*COPYRIGHT (C) 1979 

> *DIGITAL EQUIPMENT CORP. 

; #MAYNARD , MASS. 01754 


: #PROGRAM BY RAYMOND SHOOP 
SATHIS PROGRAM WAS ASSEMBLED USING THE PDP=11 MAINDEC SYSMAC 
3 SPACKAGE (MAINDEC=11=DZQAC-C3), JAN 19, 1977. 


REV B -- ADDED DYNAMIC EXTERNAL STOP TEST. 
REV C == FIXES KEYBOARD SELECTION HACK AND EXPANDS THE 
DYNAMIC OFFSET FRAME. 


* SBTTL BASIC DEFINITIONS 
hs ol i OF THE STACK POINTER *** 1100 *** 


STA 

-EQUIV EMT,ERROR ;;BASIC DEFINITION OF ERROR CALL 
“EQUIV IOT.SCOPE ;sBASIC DEFINITION OF SCOPE CALL 
; *MISCELLANEOUS DEF INITIONS 
HT= 11 :CODE FOR HORIZONTAL TAB 


LF= 12 ::CODE FOR LINE FEED 

CR= 15 ;:CODE FOR CARRIAGE RETUR 

CRLF= 200 ;;CODE FOR CARRIAGE RETURN-L INE FEED 
PS= 177776 ; PROCESSOR STATUS WORD 


3:STACK LIMIT REGISTER 


S o- 

DDISP= 177570 7 sHARDWARE DISPLAY REGISTER 
; *GENERAL PURPOSE REGISTER DEF INITIONS 

RO= 20 NE 


ze RAL REGISTER 
R1= %1 ;;GENERAL REGISTER 
R2= Re ;;GENERAL REGISTER 
R3= %3 3 ;GENERAL REGISTER 
R4= 24 ; GENERAL REGISTER 
R5= z5 3G NERAL REGISTER 
R6= x6 ;GENERAL REGISTER 
R7= %7 7 GENERAL REGISTER 
SP= 26 3:STACK POINTER 
PC= %7 3 PROGRAM COUNTER 
:*PRIORITY LEVEL DEFINITIONS 
PRO= 0 7:PRIORITY LEVEL 0 
PR1= & 7zPRIORITY LEVEL 1 
PR2= 100 7:PRIORITY LEVEL 2 
PR3= 140 ;zPRIORITY LEVEL 3 
PR4= 200 7zPRIORITY LEVEL 4 
PR5= 240 7zPRIORITY LEVEL 5 
PR6= 300 a tonity LEVEL 6 
PR7= 340 PRIORITY LEVEL 7 





SEQ 0015 


on 


D2 
CZVSDC VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17-SEP-79 08:50 PAGE 1-1 


CZVSDC.P11 11-SEP-79 09:01 BASIC DEF INITIONS SEQ 0016 
(1) 3*' "SWITCH REGISTER’ SWITCH DEFINITIONS 
SW15= 100000 
040000 SW14= 40000 
SW13= 20000 
010000 SWwi2= 10000 
SW11= 40 
Sw10= 2000 
001000 swo9= 1000 
0 SwO8= 400 
000200 SwO7= 200 
000100 SwO6= 100 
040 SswOS= 40 
20 SwO4= 20 
: 000010 SwO3= 10 
00 Sw02= 
000002 SwOl= 2 
000001 SwO0= 


100000 BiT15= 

040000 BIT14= 40000 

020000 BIT13= 20000 

010000 BIT12= 10000 

004000 BIT1i= 

002000 BIT10= 2000 

001000 BITO9= 1000 
BITO8= 400 

000200 BITO7= 200 

000100 BITO6= 100 
BITO5= 40 

000020 BITO4= 20 

000010 BITO3= 10 
BIT02= 

2 BITO1= 2 
000001 B1T00= 


“EQUIV BITOO.BITO 


OAR RRA AAA AAA AA AA AAA AAAAA AAA AA AAAA AAA AAA AAA AAA AAO 
i i a od oJ 2 2 I) = 
NNN Nee ee ff we VS SS SS eS ev mss a 
. be 9 ae 
‘ . 
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PLL BOLO LOL LOLOL LO LO LPL FO 
a os 2 3 SH Sf) 2 2 SS AINONONYDY) @ 9 Ps PO OS SB St SS YS 


ee ee nO, ee 


te i a ee a 


000000 


000174 
000174 000000 
000176 000000 
000200 000137 001336 


E 
MACY11 30G(1063) 17-SEP-79 08:50 PAGE 1-2 
BASIC DEFINITIONS 


;*BASIC "'CPU’’ TRAP VECTOR ADDRESSES 


ERRVEC= 4 ; TIME OUT AND OTHER ERRORS 
RESVEC= 10 : RESERVED AND ILLEGAL INSTRUCTIONS 
TBITVEC=14 ii T'' BIT 
TRIVEC= 14 TRACE TRAP 
BPTVEC= 14 BREAKPOINT TRAP (BPT) 
IOTVEC= 20 gd les ty TRAP (IOT) **SCOPE** 
PWRVEC= 24 POWER FAIL 
EMTVEC= 30 : SEMULATOR TR TRAP (EMT) **ERROR** 
TRAPVEC=34 3" TRAP" 
TKVEC= 60 ZTTY KEYBOARD VECTOR 
TPVEC= 64 :TTY PRINTER VECTOR 
P1RQVEC=240 : TPROGRAM INTERRUPT REQUEST VECTOR 
ABASE= 172000 ; DISPLAY PC ADDRESS. 
AVECT1= 100320 ; 1ST OF 4 DISPLAY VECTORS. 
APRIOR= 200 
- SBTTL OPERATIONAL SWITCH SETTINGS 
* SWITCH USE 
hs 14 LOOP ON TEST 
-. 9 STOP SUB=PICTURE MOTION 


8 LOOP ON TEST IN SWR<7:0> 
* SBTTL TRAP CATCHER 


-=0 
;*ALL UNUSED LOCATIONS FROM 4 - 776 CONTAIN A *'.+2,HALT"’ 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
LOCATION Q CONTAINS 0 TC CATCH IMPROPERLY LOADED VECTORS 


DISPREG: .WORD 0 3 :SOFTWARE DISPLAY REGISTER 
SWREG: . WORD 


0 i:SOFTWARE SWITCH REGISTER 
.SBTTL STARTING ADDRESS(ES) 
JMP @ABEGIN ;;JUMP TO STARTING ADDRESS OF PROGRAM 


SEQ 0017 


ee 
CZVSDC VS60 VISUAL DISPLAY TEST MACY11 + 5 Nae 17=SEP=79 08:50 PAGE 2 
CZVSDC.P11 11=SEP=79 09:01 ACT11 HOOK SEQ 0018 


? .SBTTL ACT11 HOOKS 
( STARA AERREKARERERERRERRRERERARRERREEREERAEEERAEREREERR EH 
( “HOOKS REQUIRED BY ACT11 
( 000204 $SVPC=. :SAVE PC 
( 000046 .=46 
( 000046 006664 SENDAD ::1)SET LOC.46 TO ADDRESS OF $ENDAD IN .$EOP 
(7) 000052 000000 “WORD 0 ::2)SET LOC. 332 TO ZERO 
( 204 .=$SVPC : ; RESTORE P 
001000 = 


-=1000 
-SBTTL APT PARAMETER BLOCK 


FTAA AERA RARER EERE EERE EKER KEKE ERE RR REE EE 


SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 


J LAER REAR EREEERREREREERAREAERAEREEEEERERE KERR ERE ERE REE 


001000 - $X=, co CURRENT LOCATION 

000024 2=24 fe POWER FAIL TO POINT TO START OF PROGRAM 
000024 000200 200 FOR APT START UP 

000044 -=44 ::POINT TO APT INDIRECT ADDRESS PNTR. 
006044 001000 SAPTHDR ‘IPO OINT TO APT HEADER BLOCK 

001000 -=.$X  ;;RESET LOCATION COUNTER 


FIO OI III IIORIIOR OTI A IIAIASAAI ASIA IS SIISIISIII SS SIASS I IASAIASIA SIN. 
;SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
; INTERFACE SPEC. 


091000 SAPTHD: 

001000 000000 $HIBTS: .WORD 0 ;;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

001002 001172 SMBADR: .WORD $MAIL : sADDRESS OF APT MAILBOX (BITS 0-15) 

001004 000020 $TSTM: .WORD 20 RUN TIM OF LONGEST TEST 

001006 0003500 $PASTM: .WORD 300 #7 RUN tion IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

001010 000000 $SUNITM: .WORD 0 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 


ee SS as a I) 3 2 a J IN SND SS = OO OP SN 


ee ee ee ee ee ee ee a 


001012 000032 -WORD S$ETEND- ~$itAIL/2 3;LENGTH MAILBOX-E TABLE (WORDS) 


CZVSDC vS60 VISUAL DISPLAY TEST 
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COMMON TAGS 


CZVSDC.P11 11=SEP=79 09:01 SEQ 0019 
" -SBTTL COMMON TAGS 
(3) DDRII IDIDIIIOIUIDIOIDIDIUIIIDIDISISIIOIUIUIOIIIUIOIOIIIDIDIOIUIOIOIFIOIOISITIOIOI OTITIS TTT OTE 
(1) ;*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
She ;*USED IN THE PROGRAM. 
) 
(1) 001100 .=1100 
(1) 001100 SCMTAG: :2START OF COMMON TAGS 
(1) 001100 000000 -WORD Q 
(1) 001102 000 $TSTNM: .BYTE 0 ;:CONTAINS THE TEST NUMBER 
(1) 001103 000 SERFLG: .BYTE 0 :- CONTAINS ERROR FLAG 
(1) 001104 000000 $ICNT: .WORD 0 ;:CONTAINS SUBTEST ITERATION COUNT 
(1) 001106 000000 $LPADR: .WORD 0 CONTAINS SCOPE LOOP ADDRES 
(1) 001110 000000 $LPERR: .WORD 0 CONTAINS SCOPE RETURN FOR ERRORS 
(1) 001112 000000 SERTTL: .WORD 0 CONTAINS TOTAL ERRORS DETECTED 
(1) 001114 000 SITEMB: .BYTE 0 ;: CONTAINS Ah CONTROL BYTE 
(1) 001115 001 SERMAX: .BYTE 1 ::CONTAINS MAX. ERRORS PER TEST 
(1) 001116 000000 SERRPC: .WORD 0 :: CONTAINS PC OF LAST ERROR ee 
(1) 001120 000000 $GDADR: .WORD 0 ::CONTAINS ADDRESS OF ‘GOOD’ DATA 
(1) 001122 000000 $BDADR: .WORD 0 ;:CONTAINS ADDRESS OF *BAD' DATA 
(1) 001124 000000 $GDDAT: .WORD QO 3:CONTAINS ‘GOOD’ DATA 
(1) 001126 000000 $BDDAT: .WORD 0 3:CONTAINS "BAD DATA 
(1) 001130 000000 -WORD 0 7 ;RESERVED--NOT TO BE USED 
(1) 061132 000000 «WORD 0 
(1) 001134 000 $AUTOB: .BYTE 0 ; ;AUTOMATIC MODE INDICATOR 
(1) 001135 $INTAG: .BYTE 0 3; INTERRUPT MODE INDICATOR 
(1) 001136 -WORD 0 
(1) 001140 177570 : «WORD DSWR ;;ADDRESS OF SWITCH REGISTER 
(1) 001142 177570 DISPLAY: .WORD DDISP ; ADDRESS OF DISPLAY REGISTER 
(1) 001144 177560 KS: 177560 eTTy KBD STATUS 
(1) 001146 177562 $TKB: 177562 : TTY KBD BUFFER 
(1) 001150 177564 $TPS: 177564 ::TTY PRINTER STATUS REG. ADDRESS 
(1) 003152 177566 $TPB: 177566 i: TTY PRINTER BUFFER REG. ADDRESS 
(1) 001154 0 lL: BYTE © ::CONTAINS NULL CHARACTER FOR FILLS 
(1) 001155 002 $FILLS: .BYTE 2 :: CONTAINS # OF FILLER CHARACTERS gh ee 
(1) 001156 012 $FILLC: .BYTE 12 23 INSERT FILL CHARS. AFTER A ‘LINE F 
(1) 001157 000 STPFLG: .BYTE 0 "TERMINAL AVAILABLE'' FLAG (BIT<07>20= YES) 
(1) 001760 000000 $REGAD: .WORD 0 >: CONTAINS THE ADDRESS FROM 
(1) : WHICH ($REGO) WAS OBTAINED 
(3) 001162 $REGO: .WORD 0 ;:CONTAINS (($REGAD) +0) 
(3) 001164 $REG -WORD 0 sitar (($REGAD) +2) 
(1) 001166 077 $QUES: .ASCII /?/ 3 QUESTION MARK 
(1) 001167 015 SCRLF ASCII <15> :: CARRIAGE RETURN 
(1) 001170 000012 $LF ASCIZ <12> ::LINE FEED 
(2) DOO III IOIIOIIIOIUIOIUIOIUIOIIOIOIOIUIOIOIIOI IOI IOI IOI IICIOISIOISIOISIOI IDIOT TIOITIOIOTOI TOIT OAAO 
(2) .SBTTL APT MAILBOX~E TABLE 
(3) DDO IIISIOIOIIIIDIIOIOIOIOIOIDIOIDIIIOIOIOIOIOIIOIOIOIIOIIIOIOIOIDIOIOIOIOIICIOIIOIOI IDIOT OTS 
(2) -EVEN 
(2) 001172 $MAIL: T MAILBOX 
(2) 001172 SMSGTY: .WORD AMSGTY : IME SSAGE TYPE CODE 
(2) 001174 000000 SFATAL: AFATAL 2s FATAL ERROR NUMBER 
(2) 001176 0 $TESTN: .WORD ATESTN ;;TEST NUMBER 
(2) 001200 $PASS: .WORD APASS  ;:PASS COUNT 
(2) 001202 000000 $DEVCT: .WORD ADEVCT ;;DEVICE COUNT 
(2) 001204 000000 $UNIT: .WORD AUNIT ;;1/0 UNIT NUMBER 
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001222 
001223 


001224 
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000 
000 


09:01 
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APT MAILBOX~E TABLE 


$SMSGAD : 
SMSGLG: . 
SETABLE: 


$MAMs} : s 
$MTYP1: . 


ACDW1 
ACDWe 


SEQ 0020 


; MESSAGE ADDRESS 
3 ;MESSAGE LENGTH 
;:APT ENVIRONMENT TABLE 


; T 
: s ENVIRONMEN NT MODE BITS 
;;USER_ SWITCHES 


TYPE 
11/04=01,11/05=02,11/20=03,11/40=04,11/45=05 
11/70=06 .PDQ=07 ,0=10 
BIT 10=REAL TIME CLOCK 
BIT 9=FLOATING POINT PROCESSOR 
GEMENT 


37> MEM, 
MEM. TYPE BYTE - (HIGH BYTE) 


300 NSEC BIPOLAR=002 
500 NSEC MOS=003 
;;HIGH ADDRESS ,BLKA1 
“"MEM.LAST ADDR.=3 BYTES,THIS WORD AND LOW OF ‘‘TYPE’’ ABOVE 
3 ;HIGH ae BYTE 


M. BLK 
;MEM.LAST ADDRESS,BLKA2 
* HIGH ADDRESS,M.S.BYTE 
+ =MEM. TYPE ,BLKA3 
7 MEM.LAST ADDRESS, BLKA&3 
: HIGH ay HF M.S.BYTE 
; . T JBLKAS 
+ MEM. UASt ADDRESS ,BLKA4 
33 INTERRUPT VECTOR#1 ,~BUS PRIORITYA1 
ar aon VEC TOR#2BUS PRIORI TYA2 
pavlen ia OF EQUIPMENT UNDER TEST 
CONTROLLER DESCRIPTION WORDA1 
: CONTROLLER DESCRIPTION WORD&2 


I 2 
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CZVSDC.P11 11-SEP-79 09:01 ERROR POINTER TABLE ; SEQ 0021 


1 .SBTTL ERROR POINTER TABLE 

(1) 3*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
(1) ;*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

1) [*LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE a iy PERTINENT. 
(1) > *NOTE1: IF $ITEMB IS 0 THE ONLY PERTINENT DATA IS ($ERR 

aS :*NOTE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
(1) :* EM 3sPOINTS TO THE ERROR MESSAGE 

(1) :* - DH ;sPOINTS TO THE DATA HEADER 

(1) 7 DT 3sPOINTS TO THE DATA 

3 * DF 3sPOINTS TO THE DATA FORMAT 

(1) 

a 001256 SERRTB: 

$ NO ERRORS ARE TYPED OUT 

3 -SBTTL OPERATOR VARIABLE LOCATIONS 

37 001256 000020 DELAY: BIT4 ;CPU DELAY FACTOR (SMS FOR 11/40 CPU) 

38 001260 000060 TKBVCT: 60 ; CONSOLE KEYBOARD VECTOR 

4 001262 060062 TKBVT1: 62 

a} -SBTTL VS-60 ADDRESSES AND INTERRUPT VECTORS 

43 001264 172000 DPC: 172000 DISPLAY PROGRAM COUNTER 

44 001266 172002 DSR: 172002 :DISPLAY STATUS REGISTER 

45 001270 172004 XPOS: 172004 DISPLAY X AXIS REGISTER 

46 001272 172006 YPOS: 172006 ;DISPLAY Y AXIS REGISTER 

47 001274 172010 DSREL: 172010 DISPLAY RELOCATE REGISTER 

48 001276 172012 DSR1: 172012 ;DISPLAY EXT. STOP ADDRESS 

49 001300 172014 XDOFF: 172014 DISPLAY X DYNAMIC OFFSET REGISTER 

50 001302 172016 YDOFF: 172016 ;DISPLAY Y DYNAMIC OFFSET REGISTER 

51 001304 172020 172020 

52 001306 172022 VSCONS: 172022 ;DISPLAY CONSOLE STATUS REGISTER 

53 001310 172024 1eShSe 

54 001312 172026 172026 

2 001314 172030 VSTERM: 172030 ;DISPLAY CHARACTER TERMINATE REGISTER 

57 001316 000320 DDONE: 320 :DISPLAY INTERRUPT VECTOR FOR STOP 

58 001320 000322 DDONE1: 322 

59 001322 000324 LPVCT: 324 ;DISPLAY INTERRUPT VECTOR FOR LIGHT~PEN 

60 001324 000326 LPVCT1: 326 

61 001326 000330 TIMEVT: 330 ;DISPLAY INTERRUPT VECTOR FOR TIME-OUT OR SHIFT-OUT 
62 001330 000332 TMEVT1: 332 

63 0013352 000334 NAMEVT: 334 ;DISPLAY NAME MATCH VECTOR 

73 001334 000336 NAMEV1: 336 


66 -SBTTL INITIAL PROGRAM STARTUP ROUTINE 
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001336 
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000005 


012737 


013746 


001100 
001140 
001100 
025776 
00034 


177777 


001456 
000176 
000174 
000004 


001200 
000200 


001214 
001264 
001246 
000002 
001316 
001316 


001242 
160000 


002246 
177304 


000020 
000022 
006642 
001106 


001213 
001140 


177440 


MACY11 30G6(1063) 
INITIAL PROGRAM STARTUP ROUTIN 


BEGIN: RESET 
. SBTTL 


2 
17=SEP=79" Mt 50 PAGE 3 


INITIALIZE THE COMMON TAGS 


:;CLEAR THE tat ne ($CMTAG) AREA 


MOV . 

CLR (R6) + 

CMP #SWR,R6 ; DON 
BNE -~6 


MOV WSTACK, SP 
ce 7 A FEW VECTO 


ae ieee LOCATION TO BE CLEARED 
LEAR MEMORY LOCATION 


" $:LOOP BACK IF NO 


;3SETUP THE STACK POINTER 


ORS 
A#SSCOPE , @#IOTVEC jie? FOR SCOPE ROUTINE 


MOV #340, a#IOTVEC+2 ; 


MOV SENDCT . a 


7 SETUP END-OF -PROGRAM COUNTER 
ITIALIZE THE LOOP ADDRESS FOR SCOPE 
FOUND OR IT IS 


MOV -SLPAD 3 IN 
a tte FOR A HARD DUARE Sul TCH REGISTER. IF NOT 


EQUAL TO A ‘=1"', SETUP F 
MOV awe 


RRVEC ,~(SP) 
MOV #64$ , AAERRVEC 
MOV SWR 


ADSWR, 
MOV #DDISP,DISPLAY 
CMP #~-1 ,ASWR 


BNE 66$ 
BR 65$ 

64$: MOV #65$, (SP) 
RTI 


65$: MOV ASWREG, SWR 


MOV A#DISPREG, DISPLAY 


66$: MOV (SP) +, @#ERRVEC 


CLR $PASS 
BITB HAPTSIZE,SENVM 
BEQ 67$ 
MOV ASSWREG, SWR 
67$: 
RESTAT: MOV #DPC,RO 
MOV S$BASE ,R1 
1$: MOV R1,(RO)+ 
ADD 2,R1 
CMP A#DDONE ,RO 
BNE $ 
MOV #DDONE .RO 
$VECT1,R1 
BIC #160000,R1 
2$: MOV R1,(RO)+ 
ADD #2,R1 
CMP #DDONE +20 ,RO 
BNE 
CLR SWITCH 
CLR HOLD 
CLR 
CLR TSAVE 
MOV TKBVT1,a@TKBVCT 
CLR @aTKBVT1 
CLR KRBD 
TSTB aSwWR 
BEQ 3$ 


OR A SOFTWARE SWITCH REGISTER. 


::SAVE ERROR VECTOR 


3 WAR 

;7AND A HARDWARE DISPLAY REGISTER 

i TRY TO REFERENCE HARDWARE SwR 

>:BRANCH IF NO TIMEOUT TRAP OCCURRED 

ZAND THE HARDWARE SWR IS NOT = ~1 
iBRANCH IF NO TIMEOUT 

;SET UP FOR TRAP RETURN 


:sPOINT TO SOFTWARE SWR 
RESTORE ERROR VECTOR 


7zCLEAR PASS COUNT 

7-TEST USER SIZE ait APT 
73YES,USE NON-APT SWITCH 
SINO,USE APT SuITCH REGISTER 


:GET POINTER 
‘UDA lees ADDRESS 


{ADDRESSES 


; UPDATE 
3; THE VECTORS 


; HOUSEKEEP 


SRESET KRB VECTOR 


TEST FOR ‘KRB** CONTROL 
BR IF NOT 


SEQ 0022 
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001636 
001642 
001650 
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005137 
012777 
012777 
004 


022737 
001013 
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177112 
177600 
000003 
177206 


001336 
000015 


010012 
000101 


000032 


007666 
001102 


010012 
007664 
177116 


001666 
026162 
001100 


026162 
000076 


MACY11 30G(1063) 


177410 
177404 
3$: 


177422 


177404 
177376 
177370 
022314 


022400 


007666 
007666 
007666 


RETB: 


007666 7$: 


007666 
007666 


2$: 


007666 3$: 


FIXVCT: 


2 
17-SEP-79" 08:50 PAGE 3-1 
INITIALIZE THE COMMON T 


KRBD 
#RETB,@TKBVCT 
#340 ,aTKBVT1 
PC ,FIXVCT 
TST1 
#STOPI , @DDONE 
$VECT1+1,RO 
#177400,R0 
RO, @DDONE 1 
re 


aLPvcrTi 
TMEVT1, aT IMEVT 
aTMEVTI 
NAMEV1 , @NAMEVT 
@NAME Vi 
#30060,DLT14A 


eaten ar tien © 


D 
#30060, DLT14D+2 
KEYBOARD, SERVICE ROUTINE” 


a$TkB 
a7 7000. TSAVE 
#3, TSAVE 


SWITCH 
#101, TSAVE 
4$ 

#32, TSAVE 
3$ 


TSAVE ,R4 
R4,$TSTNM 
R4 


PC ,FIXVCT 
DISPTC(R4) 
2s 


R4 
MSTACK,SP 
aDISPTC(R4) 
#76, TSAVE 
6$ 


;SET *KRB'" CONTROL 
;SET UP 'KRB'' INT 


;LOAD BUS VECTORS 

selon TESTING 

7SET UP VS-60" DONE VECTOR 

:GET BRL 

MASK OFF OTHER BITS 

RESET LIGHT-PEN VECTOR 

;RESET TIME-OUT/SHIFT OUT VECTOR 
RESET NAME MATCH VECTOR 

; INIT X READOUT VALUE FOR CONSOLE #0 
7; INIT Y READOUT 


RESET READOUT VALUE FOR CONSLE 41 


sEXIT 


READ THE CHARACTER 
:MASK TO 7 BITS 
STEST FOR "‘CTRL C"' 
:;BR IF NOT 


; WAIT FOR DISPLAY STOP.. 
;..AND RE-START. 


TEST FOR ‘'CR'’ 
BR IF 

CLEAR eS bill 
SMAKE 0-7 


:>7 
;LOAD TEST # 


; WAIT FOR DISPLAY STOP. 


RESET DISPLAY VECTORS 
TEST IF VALID 


; RESET STACK 
sEXIT TO THAT TEST SELECTED 


SEQ 0023 
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177777 
007664 
177777 
000040 


007664 


010012 
007666 


MACY11 30G(1063) 
KEYBOARD SERVICE ROUTINE 


MOV #-1,HOLD 


CLR HOLD 


0000 
BASICS=RELATP! 4000 


ABSVCT=144000 
OF F STO=10000 
OF FST1=12000 
OF FST2=14000 
OF F ST3=16000 


INTO=2000 
INT1=2200 


INT7=3600 
LPOFF=100 
LPON=140 
BLKOF F=20 
BLKON=30 


LINEO=4 


LINE3=7 
PATHO=2000 


PATH7=36000 


#-1, SWITCH 
SUB #40, TSAVE 
1$ 


. « 
17-SEP-79 08:50 PAGE 3-2 


; RUBOUT 
sEXIT 


iSET ‘'STOP MOTION'’ FLAG " 
CONVERT LC TO UC 


Be Be Be Be 


1 

2 

3 

4 

5 

6 
LEVEL 7 
;DISABLE LIGHT-PEN INTERRUPT 
:DISABLE BLINK 
;ENABLE BLINK 


; DISPLAY IN CHARACTER MODE 
SHORT 


BASIC SHORT VECTOR MODE 
ABSOLUTE VECTOR MODE 


ENABLE OFFSET OF 0 


ENABLE OFFSET OF 


;ENABLE INTENSITY LEVEL 0 


ENABLE LINE TYPE 0 
;ENABLE LINE TYPE 1 
sENABLE LINE TYPE 2 
ENABLE LINE TYPE 3 


DIRECTION 0 
; DIRECT 


Wr 


SEQ 0024 


M 
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CZVSDC.P11 11-SEP-79 09:01 VS-60 INSTRUCTION SET SEQ 0025 


DJMP=160000 DISPLAY ABSOLUTE JUMP 
DJMPR=DJMP !BIT9 DISPLAY RELATIVE JUMP 
DJSR=DJMP!BIT10 ;DISPLAY JSR ABSOLUTE 
DJSRR=DJSR!BIT9 DISPLAY JSR RELATIVE 


DNOP=164000 

DPOP=DNOP !B1T10 :POP AND RESTORE 
DPOPNR=DNOP !BIT9 ;PROP AND NO RESTORE 
CONSLO=DNOP CONSOLE 0 

CONSL 1=DNOP !B1T8 :CONSOLE 1 


STATSA=170000 

DSTOP=173400 

DMENUO=STATSA!BIT1 DISABLE MENU 
DMENU1=DMENUO !B1T0 


LPLITE=200 


y 


SeeeaR 


MNMNOPENONoNoNory 
ee ed eed eed od ed 
CONAUBWR-O 


DISABLE ITALIC CHARACTERS 


ENABLE SYNC OF 30 CPS 
SYNC40=10 ENABLE SYNC OF 40 CPS 


STATSB=174000 


INCR=100 ;ENABLE ‘'GRAPHPLOT INCREMENT REG. CHANGE"’ 


STATSC=154000 
CHRRTO=STATSC!BIT9 :DISABLE CHAR ROTATE 


CHRRT1=CHRRTO!BITS 
CHARS 1 =CHARSO BITS ;LOAD CHARACTER SCALE TO 1/2 


=CHARSO'BIT6 : 1 1/2 
CHARS 3=CHARSO!BIT6!BITS : 2 


154020 VCTROO=STATSC !BIT4 ;LOAD VECTOR SCALE REGISTER 
176000 STATE=STATSB!BIT10 


176002 STRNGO=STATE !BIT1 :DISABLE CHARACTER STRING TERMINATE 
176003 STRNG1=STRNGO!BITO 


176040 EDGEO=STATE!BITS DISABLE EDGE INTERRUPT 
176060 EDGE 1=EDGEO!BIT4 
150000 DNAME=150000 ;LOAD DISPLAY NAME REGISTER 


MORE EQUATES 


INTX=61T14 : INTENSIFY 
MAXMUX=177 ; MAX 
MAXX=1777 

MAXY=1777 

HALF X=MAXX/2 

MINUSX=20000 

MINUSY=20000 
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CZVSDC VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17-SEP-79 08:50 PAGE 3-4 
CZVSDC.P11 11-SEP-79 09:01 VS-60 INSTRUCTION SET SEQ 0026 


MINSUY=100 NEGATIVE SIGN BIT <SHORT VECTOR MODE> 
SUPON=21 ;SUPER=SCRIPT ENABLE 

i SUPER@SCRIPT DISABLE 

;SUB-SCRIPT ENABLE 

;SUB-SCRIPT DISABLE 


- SBTTL 
“art TEST LETTER DESCRIPTION 
. SBTTL 


FREER RRR ERE ERKEKE EEE E EH 


S*TEST 1 A DIRECTORY FRAME 


J LARA REE REE REE RK EEK KEE EERE EERE EERE EK 


000004 TST1: SCOPE 


004537 JSR R5,DSPLA ;EXIT TO DISPLAY A FRAME 
001000 1000 
010176 FRMEO ;USING THE DIR. FRAME 


FREAK EERE KEKE EERE EEK EKER EKEEKEREREEKEKKEEKEREKEKEEEEKKE 


s*TEST 2 B ASTIGMATISM AND SETTLING TIME 


[ROR IR ICRC IOC IORIORIOI IIIS IAIN AIA IAISSISASSISSAISAISASAIAASSSSAS AM. 
000004 TST2: OPE 
004537 007676 J c00 R5,DSPLA DISPLAY DATA LOCATED IN ‘BUFFER"' 


020000 
012230 
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000004 
012737 
012700 


012037 
012037 


100441 
aot 


00000 

017716 
052737 
004537 
000001 
017716 
004537 
000005 
004537 
000001 
017716 
004537 
000005 
004537 
000001 
017716 


004537 
000005 


oth 


00000 

017716 
000732 
005337 
001325 
000416 


012537 


09:01 


000100 
010074 


017722 
017724 


007676 
040000 
007676 


002434 
007676 


002434 
007676 
002434 


007676 
007672 
002466 
001256 


002464 
002466 


007672 


017722 


002464 


B 
MACY11 30G(1063) 17-SEP-79 08: 
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HORT TERM DRIFT 


50 PAGE 4 


WE SRERGAASAALASASALALALASALAAAARASASARSSALA LES AL ESAS RAS SARA SASS SS | 


SHORT TERM DRIFT 


FERRARA EERE EERE RRERERREERERRREREREERRRRRRRR EH 


i*TEST 3 
TST3: 
1$: 

2s: 


3$: 


SECDLY: 
2$: 
1$: 


#BIT6,TEMPA 
#TABA,RU 


(RO)+,STDRA 
(RO) +,STDRB 


3$ 

R5,DSPLA 
#INTX,STDRA 
R5,DSPLA 


R5,SECDLY 
R5,DSPLA 


R5,SECDLY 
R5S,DSPLA 
R5,SECDLY 
R5,DSPLA 
2$ 

TEMPA 


1$ 
TST4 


(R5)+,11$ 
DELAY, 10$ 
10$ 


;LOAD EXECUTION COUNT 
;LOAD TABLE POINTER 


;LOAD X POSITION DATA 
;LOAD Y POSITION DATA 
;LOAD X+Y POSITION-DO NOT DISPLAY 
;LOAD INTENSIFY ENABLE 


:DISPLAY DATA 


DELAY FOR 5 MSEC 
;DISPLAY POINT AGAIN 


DELAY FOR 5 MSEC 
;DISPLAY POINT AGAIN 
DELAY FOR 5 MSEC 


;DISPLAY POINT AGAIN 


FINISHED EXECUTION? 
;:BR OVER SUBROUTINE 

;LOAD TOTAL DELAY COUNT 

;LOAD 1 MS. 

DELAY 

;DEC MSEC COUNT 

sEXIT 


SEQ 0027 





Om 
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012737 
012737 
012737 


012737 


012737 


001000 
007676 


007676 


007672 


026246 
164700 
012556 


012606 


001777 
000040 
060040 
000037 
017734 
017750 


007672 


000040 
000040 


000000 
000040 
041740 


007672 


007672 


017736 
017740 
017744 


007672 


MACY11 + eee 
14 D 
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OR AXIS GAIN, OFFSET AND PHASE ADJUSTMENT 


SEQ 0028 


RADAR AASAASAAARAAASLALSAALAAAAAASALALASL EASA EASA RAR ARRAS ESA AR AAD SESE D DS 


D MINOR AXIS GAIN, OFFSET AND PHASE ADJUSTMENT 


J RARER EERE EREEEERE RARER ARREARAEAEKREEERERERE ERE ERE 


TS 


1$: 


T4: SCOPE 
MOV #B1T3,TEMPA 
R5,DSPLA 


;LOAD EXECUTION COUNT 
DISPLAY SUB-PICTURE 


FINISHED EXECUTION ? 
BR IF NOT 


PT BR RR Dale ha Rake he hehehehe hahehehehelelalahahehahaleleleielalehaheleleleleialeiahelelsieleisieieieiaisieleleleisieialelel 


7* 


r§ 


1$: 


TEST 5 


MAJOR AXIS OFFSET AND VECTOR START POINT ADJUSTMENT 


MeASAARASELA ££ 22 2222 SS SRSASESSESE SES ASE SEERA S RSA S RSE RSA RASS D SS DG 


T5: SCOPE 

MOV ABIT9, TEMPA 
mn R5,DSPLA 
FRME2 

13" R5,DSPLA 
VSTRT 


DEC TEMPA 
BNE 1$ 


;DISPLAY OFFSET SUB-PICTURE 


;DISPLAY VECTOR START SUB-PICTURE 


FINISHED EXECUTION LOOP? 
BR IF NOT DONE. 


CL I KERR REE RRR KEK EK EEREKEKERE EERE KEE 


** 
° 


TEST 6 F 


VECTOR LENGTH GAIN, CONVERGENCE AND VECTOR LINEARITY 


FD IRE REE REE KERR REE EKER ERE KERR KEKE EERE REE EE 


TST6: SCOPE 

ss nae yt PS BUFFER FIRST 
#CONSL1! Fb  pberhier (RO) + 
1$: 


#PICSTO, 
(R1)+, (RO)+ 
cee ae 


AMAXX ,PICVTA 
#40 ,P] 


-PICVTB 
MINTX!MINUSX+40 ,PICVTC 


#37, TEMPA 
#PICVTL,R1 
(R1)+,(RO)+ 
MPICVTE,R1 
2$ 


TEMPA 

4$ 
#40,PICVTB 
#40 ,PICVTC 
3$ 

#0 gpa ® 


#40,PICVT 
oINixel f0, PICVTC 


;LOAD DISPLAY PICTURE — 
E CONSOLE # 

;LOAD ° POINTER’ 

GET DATA INTO BUFFER 

; TEST FOR END 

:BR IF NOT 


STARTING X POSITION 
STARTING Y POSITION 
INTENFIFY, MINUS DIR AND VALUE 


A COUNTER 
SUB-PICTURE POINTER 
DATA 


FOR END 
F NOT 


:;BR IF DONE THIS SIDE 
ADJUST STARTING Y POSITION 
SADJUST VECTOR LENGTH 


;LOAD STARTING X POSITION 
;LOAD STARTING Y POSITION 
;LOAD INTENSIFY AND DELTA VALUE 





On 
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387 
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012737 


012720 
012720 


012720 
012737 
004537 


002000 
026246 


09:01 

060037 
017734 
017750 


007672 


000040 
000040 


114000 
040000 
001777 


110000 
041777 


026246 


003146 
007676 


007672 


017740 
017744 


001106 


MACY11 30G(1063) 
T6 F V 


6$: 


7$: 


8$: 


THE cing) HAS NOW hae alia 
20$: 


JSR 
2 
BUFFER 


D 
17-SEP-79 08:50 


#37, TEMPA 
#PICVTL,R1 
(R1)+, (RO)+ 
#PICVTE,R1 
6$ 


TEMPA 

7$ 
#40,PICVTB 
#40,PICVTC 
5$ 

#POINT, (RO) + 
MINTX,R1 
AMAXY ,R2 
R1,(RO)+ 
R2, (RO) + 
#640,R1 
eens 


8 

#POINT, (RO) + 

#0, (RQ) + 
WMAXY , (RO) + 
MLONGV, (RO) + 
#INTX!MAXX, (RO) + 
AMINUSX !MAXY, (RO) + 


VECTOR SECTION 


#POINT, (RO) + 
#1000, (RO) + 
#1000, (RO) + 
ABASICV, (RO) + 


MINTX!PATHO!HALFX, (RO) + 
MINTX!PATH4!HALFX, (RO) + 
MINTX!PATH2!HALFX, (RO) + 
MINTX!PATH6!HALFX, (RO) + 
MINTX!PATH4 !HALFX, (RO) + 
MINTX!PATHO!HALFX, (RO) + 
MINTX!PATH6!HALFX, (RO) + 
MINTX!PATH2!HALFX, (RO) + 


#DSTOP, (RO) + 
#DIMP,, (RO) + 
#BUFFER, (RO) + 


#20$,$LP 
R5, DSPLA 


PAGE 
ECTOR LENGTH GAIN, CONVERGENCE AND VECTOR LINEARITY 


5-1 


;LOAD A COUNTER 


;LOAD a POINTER 


[LOAD DAT 
STEST FOR END 


ICTURE 
“ADJUST STARTING Y POSITION 
ZADJUST VECTOR LENGTH 


BR BACK 
LOAD POINT INST 


[LOAD STARTING X POSITION 
[LOAD STARTING Y POSITION 


;LOAD X POSITION 
;LOAD Y POSITION 
sADJUST X 
sADJLST Y 

;BR IF NOT DONE 


;LOAD POINT IN UPPER LEFT CORN 
;LOAD DECENDING DIAG. LINE 


;LOAD BASIC VECTOR 


DISPLAY BASIC VECTOR 


RESET LOOP ADDRESS 


;EXIT TO DISPLAY ROUTINE 
;USING BUFFER STORAGE 


SEQ 0029 


on 
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004537 
004000 
026246 


026246 
164700 


000000 
110000 


007676 
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4 TET T TTT T TT TTT TI TI TILT T TTL LL LILLE LLL LLL ELL LLL LLL LLL LLL LLL 


;LOAD START ADDRESS 
: ENABLE CONSOL #1 
AD 0,0 ORGIN 


i*TEST 7 G PINCUSHION FRAME 
SOROS SIOIIOISISIUISIOISISISIDIIIISISISIOIIOISIDIUISIOIIOIIIOIOIDOIDIOIIDIOIDIOIIIUIUINOIDIIIUIIIOIOID I 
TST7: SCOPE 

MOV BUFFER ,RO 

MOV -#CONSL1!BIT7!BIT6, (RO) + 

JSR PC,3$ 

MOV 


2$: 


3$: 


4$: 


#20,R1 
MOV MINTX, (RO) + 
MOV AMAXY, (RO) + 
MOV #100, (RO)+ 
MOV AMINUSX+MAXY, (RO) + 


"DEC R1 


1$ 
MOV AMINUSX+1, (RO) + 
MOV #0, (RO)+ 
MOV #INTX, (RO) + 
MOV AMAXY , (RO) + 


JSR PC,3$ 

MOV #20,R1 

MOV HINTX*MAXX, (RQ) + 
MOV #0, (RO) + 

MOV aM INUSX*MAXX, (RO)+ 
MOV #100, (RO)+ 

DEC R1 

BNE 


2s 
MOV #0,(RO)+ 
MOV #MINUSX+1, (RO) + 
MOV WINTX#MAXK, (RO) + 
MOV #0, (RO)+ 
MOV #DSTOP, (RO) + 
MOV #DIMP, (RO) + 
MOV > ‘yale 


MOV #POINT! INT4, (RO) + 
MOV #0, (RO)+ 

MOV #0,(RO)+ 

MOV #LONGV., (RO) + 


JSR R5,DSPLA 
4000 
BUFFER 


1 TOP COUNT 
; LOAD INT LINE 


MAX Y 

[LOAD DELTA x 
;LOAD - MAX Y 
Ce 


;BR IF NO 
:GO BACK 1 UNIT 
;PLOT LAST LINE 


; UP COUN 

SLOAD DELTA X MAX 
;LOAD DELTA Y = 0 
“RE TRACE 

;LOAD DELTA Y OF 100 
sFINISHED ? 

;BR IF NOT 


;PLOT LAST LINE 


;LOAD STOP 
;LOAD JUMP 


;LOAD POINT 
: AT X 
© AT ¥ 
oe VECTOR 


EXIT TO DISPLAY FRAME 


;USING THE CROSS HATCH PATTERN 


SEQ 0030 


G 3 | 
CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17-SEP-79 08:50 PAGE 8 
CZVSDC.P11 11=SEP=79 09:01 T12 J OFFSET X AND OFFSET Y POSITION SEQ 0032 


502 STARR AREER ERE ERE RRREEEKEKERE RRR ERE 
(3) i*TEST 12 J OFFSET X AND OFFSET Y POSITION 

(3) 5 LARA AAR EERRERAE REAR KEE ERE EERE ERD 
(2) 003460 000004 TST12: SCOPE 

505 DISPLAY A SQUARE IN THE en SCREEN, THEN 

504 ;MOVE THE BOX TO THE RIGH 

505 003462 012737 010000 015222 MOV MBITI2, OFT ;LOAD BASIC X OFFSET VALUE 
506 003470 012737 010000 015224 MOV #B1T12,0FFT2 ;LOAD BASIC Y OFFSET VALUE 
507 003476 004537 007676 1$: JSR R5,DSPLA ;DISPLAY THAT FRAME 

508 003502 1 100 

509 003504 015220 OFF TST 

510 003506 005737 010012 TST SWITCH TEST IF HOLD HERE 

511 003512 001371 BNE 1$ 7BR IF YES 

512 003514 062737 000001 015222 ADD #1, ;UPDATE THE X OFFSET 

513 003522 022737 011400 015222 CMP Witie! 1400, OFF T1 ;TEST IF MORE TO MOVE 
ra 003530 001362 BNE 1$ ;BR IF NOT 

516 sMOVE a * _ TO matt LEFT 

517 003532 012737 030000 015222 112! MINUSX, OFFT1 ;LOAD THE BASIC X OFFSET 
518 003540 012737 019000 015224 MOV w1T12, OFFT2 ;LOAD THE BASIC Y OFFSET 
519 003546 004537 007676 2$: JSR R5,DSPLA :DISPLAY THE FRAME 

520 003552 

521 003554 015220 OFF TST 

522 003556 005737 010012 TST SWITCH ;TEST IF HOLD HERE 

523 003562 001371 BNE 2$ ;BR IF HOLD 

524 003564 062737 000001 015222 ADD #1 OFF ;UPDATE THE X OFFSET 

525 003572 022737 031400 015222 CMP #31112 !MINUSK! 1400, OFFT1 TEST IF MORE 
gee 003600 001362 BNE 2$ ;BR IF NOT 

528 ;MOVE TE BOX UP 

529 003602 012737 010000 015222 MOV #B1T12,0FFT1 ;LOAD BASIC X OFFSET 

530 003610 012737 010000 015224 MOV #B1T12,0FFT2 ;LOAD BASIC Y OFFSET 

531 003616 004537 007676 3$: JSR R5,DSPLA DISPLAY THAT FRAME 

532 003622 00 

533 003624 015220 OFF TST 

534 003626 005737 010012 TST SWITCH TEST IF HOLD HERE 

535 003632 001371 BNE 3$ IF YES 

536 003634 062737 000001 015224 ADD #1,0FFT2 “UPDATE Y OFFSET 

537 003642 022737 011400 015224 CMP wit l2! 1400, OFFT2 TEST IF MORE 

oe 003650 001362 BNE 3$ BR IF NOT 

540 :MOVE THE BOX DOWN 

541 003652 012737 030000 015224 MOV #BIT12!MINUSY ,OFFT2 ;.OAD THE BASIC Y OFFSET 
542 003660 012737 010000 915222 MOV #B)112,0FFT1 ;LOAD THE BASIC X OFFSET 
543 003666 004537 007676 4$: JSR R5.DSPLA ;DISPLAY THAT FRAME 

544 003672 10 

545 003674 015220 OFF TST 

546 003676 005737 010012 TST SWITCH TEST IF HOLD HERE 

547 003702 001371 BNE 4$ :BR IF YES 

548 003704 062737 000001 015224 ADD #1,0FFT2 UPDATE Y OFFSET 

549 003712 022737 031400 015224 CMP #1712! MINUSK!1400,0FFT2’ | great whe MORE 

550 003720 001362 BNE 4$ R IF 
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005037 


012777 


015222 


015220 
175312 


021400 
001400 
020000 
175236 
175234 
007734 
173566 

175220 
007734 


175346 


010006 


175226 


MA 
T] 


Se Be Be Fe te 


ts 


1$: 


2$: 


3$: 


H 
CY11 30G(1063) 17-SEP-79 08:50 PAGE 8-1 
2 J OFFSET X AND OFFSET Y POSITION 


NOW DO IT ALL AGAIN SETTING THE OFFSET REGISTERS DIRECTLY. 


MOVE THE BOX DIAGONALLY TO THE UPPER RIGHT (POS, POS) 
THEN TO THE LOWER LEFT (NEG, NEG). 


*** NOTE: WHEN DEALING WITH THE OFFSET REGISTERS DIRECTLY, 
IT APPEARS THAT THE NEG DIRECTION (B1T13) GETS Ag ON A 
DISPLAY '‘START'' FUNCTION. RESUME SEEMS TO BE OK, HOWEVER TO 
BE SAFE, ''START’’ WITH + OFFSET, AND RELOAD REGISTERS PRIOR 
TO EVERY ‘RESUME’. 222 H-A-=C -K ??? 


T12A: 
CLR OFFT1 ; ZERO OFFSET INSTRUCTIONS... 
CLR OFFT2 z;...IN THE DISPLAY FILE. 
CLR @XDOF F ; CLEAR OFFSET REGISTERS. 
CLR a@YDOFF 
MOV #2$ , DONE ; CHANGE STOP VECTOR. 
JSR R5,DSPLA ; XCT DISPLAY... 
1, OFFTST ;..-ONCE TO INIT THE OFFSETS. 
CLR RO : VARIABLE OFFSET VALUE => RO. 
MOV RO, @XDOF F ; SET 1ST/NEXT OFFSET. 
MOV RO, a@YDOFF 
MOV #100, COUNT ; SET CYCLE COUNT. 
JSR RS ,RESUME :...AND RESUME DISPLAY. 
TST SWITCH 
BNE 1$ ; BR IF STOP MOTION IS SET. 
INC RO ; BUMP OFFSET VALUE. 
CMP RO,AB1T13!1400 ; ALL DONE ??? 
BEQ $ : EXIT IF SO 
CMP RO,41400 ; HALF DONE ??? 
BNE 1$ ; NOT YET, LOOP. 
MOV #B1T13,RO & VES. START NEG HALF. 
BR 1$ 
MOV RO, aXDOF F ;*** ON STOP INTERRUPT... 
MOV RO, aYDOFF 3..-RELOAD OFFSETS *** 
JMP STOP] ; CONTINUE NORMAL STOP SEQ. 
CLR @XDOF F ; CLEAR OFFSET REGISTERS. 


CLR @YDOF F 
MOV #STOP],@DDONE ; RESET STOP VECTOR. 


SEQ 0033 










— SS Ss SS SS SS SS SS SS 
RVSENSVEKSRSS 


SES RRSREVKSEEL 
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000004 
012737 
004537 
000060 
020666 


005337 
001371 


01272C 
00457" 
00020c 
026246 


006200 007672 
007676 


007672 


026246 


021424 


160000 
021356 


007676 


I 
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TDA A IIIS SISOIISISIDIISIOOISISISISIOIIOIOIUIOIUIOISIOISIII IOI IOI IIT TIS TT TE EI IE 
i*TEST 13 K CHARACTER SCALE FRAME 
SDB EISIGISIIIOOIISIOISISIOISIOIISIDISIIIOIOIOIOIOIOIUIOIICI IOI IOI TOT TST TT TE TT TE 
TST13: SCOPE 

MOV ABIT7, TEMPA ;LOAD EXECUTION COUNTER 


1$: + R5,DSPLA ;DISPLAY SUBPICTURE DATA 
CHAQU 
DEC TEMPA ZF INISHED EXECUTION? 
BNE 1$ ;BR IF NOT 
SIO ISRO GIIIOIICISISIOIUIOIOIOISIOITIOI IOI IOI OTITIS TOT OT TOT TOT TOT TTT TITAS ASA SS SAS 
*TEST 14 L CHARACTER QUALITY AND CHARACTER ROTATE IN THE MENU 


is FRR RRR RR REE RRR EK EKER EEE EEE EERE EERE EKER EE 


TST14: SCOPE 


MOV ABUFFER,RO ;LOAD DESTINATION POINTER 
MOV #CONSL1!BIT7!BIT6,(RO)+ ;ENABLE CONSOLE #1 
MOv #POINT, (RO)+ ;LOAD ‘DPOINT"’ 
CLR (RO) + ;LOAD X AXIS 
MOV AMAXY-14, (RO) + LOAD Y 
MOV #15,R1 ;LOAD COUNT 
1$: MOV AMDJSR, (RO) + ;LOAD 'DJSR*’ TO BUFFER SPACE 
MOV ACHARQA, (RO) + ;LOAD TARGET ADDRESS 
DEC R1 FINISHED ? 
BNE ;BR UNTIL DONE 


1$ 
MOV ADIMP, (RO) + 
MOV MROTCHR, (RO) + 


JSR R5,DSPLA EXECUTE DISPLAY FILE 
BUFFER STARTING AT ‘BUFFER’ ADDRESS 


RETURN ADDRESS TO THE ROTATED CHAR SUB-PIC 





SEQ 0034 
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013702 
004737 


026246 
15 


004436 
004436 
004456 


MACY11 30G6(1063) 
T15 M 


;*TEST 15 


LOADSP: 


1$: MOVB 
2$: INC 


LOADBF: MOV 
MO 


17=SEP-79" 08:50 PAGE 
CHARA 


10 
CTER SET, SUPERSCRIPT, SUBSCRIPT AND ITALICS 


SERRE EEEE EERE ERE EERE REE EERE EEE 


M CHARACTER SET, SUPERSCRIPT, SUBSCRIPT AND ITALICS 


SAAR AREER ERE EERE EEREE EERE EEE RARER REAR EERE EERE REE 


: SCOPE 
;SET UP THE BUFFER FOR THIS TEST 
#BUFFER,RO 


’ 


#CHRRTO, (RO) + 


#CONSL1!BIT?!BIT6, (RO) + 


#POINT, (RO) + 
(RO 


100, STCHAR 

LOADBF 
mid0, STCHAR 

LOADBF 
WEOCSTCHAR 
PC,LOADBF 
#STATSA!ITALO, (RO) + 
PC,LOADSP 
PC, SPACE 
#STATSA!ITAL1, (RO) + 
PC,LOADSP 
ADSTOP, (RO) + 
ADIMP, (RO) + 
#BUFFER, (RO) + 
FILE4A 
#16, (RO)+ 
R2 
R2,(RO)+ 
R2 
#17,R2 
2$ 
#40,R2 
#20017, (RO) + 
PC 
ASTATSA! ITALO, (RO) + 
STCHAR,R2 
PC, FILLIT 
PC. SPACE 
#STATSA!ITAL1, (RO) + 
STCHAR,R2 


PC FILLIT 
PC-ACRLF 
PC 


DISABLE CHAR. ROTATE 
TENABL E CONSOLE #1 
;LOAD POINT MPDE 


;LOAD INITIAL CHAR. 
;LOAD ae '¢ CHAR 


SLOAD DSTOP 


;LOAD ‘"SHIF T-OUT'' CHARACTER 
:SET INITIAL SHIFT OUT CHAR 
OAD CHAR 


7 
. 


TEST FOR al (SI) 
:BR IF SI ‘17"' 
FINISHED ? 


BR IF NOT 
Oy SHIFT=IN SPACE 


;LOAD NORMAL FONT 

:GET STARTING CHAR 

;LOAD THE CHARACTERS 

S INSERT SPACES 

[LOAD ITALICS FONT 

GET STARTING ep ee 

;LOAD THE CHARACTERS 
INSERT CR-LF 


sEXIT 


SEQ 0035 
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LOAD CR=LF'S TO VERTICALLY SPACE THE STRINGS 


ACRLF: #15, (RO)+ 
MO #12,(RO)+ 
#12,(RO)+ 
#12,(RO)+ 

PC 


sFILL IN WITH AN INCREMENTING CHARACTERS 


sEXIT 


FILLIT: MOV #40 ,R3 
1$: MOVB apres 


;LOAD "‘SPACE’’ CHAR TO SEPERATE CHAR STRINGS 
SPACE: MOV #10,R3 

1$: MOVB #40, (RO) + ;LOAD A SPACE 
DEC R3 


BNE 1$ :BR IF NOT DONE 
RTS PC sEXIT 
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CZVSDC.P11 11=SEP=79 09:01 115 M CHARACTER SET, SUPERSCRIPT, SUBSCRIPT AND ITALICS SEQ 0037 
yy sNOW ACTUAL DISPLAY THE CHARACTER SET FRAME NOT ROTATED 
702 004516 012737 000600 007672 FILE4A: MOV #600,T :LOAD A COUNTER 
703 004524 012737 155000 026246 MOV aCHRATO B BUFFER :D1SABLE ROTATE 
704 004532 012737 001700 026256 1S: MOV WMAXY 77, BUF FER+10 D STARTING Y POIN 
705 004540 004537 007676 JSR R5.DSP cA SPLAY IN UPPER ALF OF SCREEN 
706 004544 000001 1 
£07 004546 026246 BUFFER 
709 004550 012737 000400 026256 MOV #400 ,BUFFER+10 ;LOAD STARTING Y POINT IN THE LOWER HALF 
710 004556 004537 007676 JSR R5,DSPLA :DISPLAY IN LOWER HALF OF SCREEN 
711 006562 000001 1 
ars 004564 026246 BUFFER 
mn aks) 004537 007676 = R5,DSPLA DISPLAY SUPER AND SUBSCRIPT IN THE MIDDLE 
16 004574 015256 SUPPIC 
718 004576 005337 007672 DEC TEMPA sFINISHED ? 
719 004602 001353 BNE 1$ “BR IF NOT 
720 004604 005737 010012 TST SWITCH :TEST IF *FREEZE’’ 
re 004610 001342 BNE FILE4GA ‘BR IF YES 
tee NOW DISPLAY THE CHARACTER SET FRAME ROTATED 
725 004612 012737 000600 007672 2%: MOV #600, TEMPA ZLOAD DELAY COUNTER FOR THIS HALF 
726 004620 012737 155400 026246 MOV #CHRRT1, BUFFER TENABLE CHAR. ATE 
727 004626 005037 026256 L BUF FER+10 sRESET Y ORGIN" 
728 004632 012737 000100 026254 3S: MOV #100,BUFFER+6 sLOAD X ORGIN 
729 004640 004537 007676 JSR R5,DSPLA “DISPLAY FRAME 
730 004644 000001 1 
ei) 004646 026246 BUFFER 
733 004650 012737 001400 026254 MOV #1400, BUF FER+6 :REPOSITION THE X ORGIN 
734 004656 004537 007676 JSR R5,DSPLA DISPLAY FRAME AT NEW ORGIN 
735 004662 000001 1 
736 004664 026246 BUFFER 
738 004537 007676 JSR RS,DSPLA :DISPLAY TEXT 
739 004672 000001 1 
740 004674 015304 SUPCO 
742 004676 005337 007672 DEC TEMPA ZFINISHED DELAY ? 
743 004702 001353 BNE 3$ :BR IF NOT 
744 004704 005737 010012 TST SWITCH ‘TEST IF FREEZE 
745 (004710 001340 BNE 2$ “BR IF YES 
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748 

(3) 

(3) 

(2) 004712 

749 

750 

751 

752 

753 004714 

754 004722 

755 004730 

756 004736 

757 004742 

758 004744 

759 004746 

760 004752 

761 

762 004754 

763 004762 

764 004770 

765 004776 

766 005002 

767 005004 

768 005006 

769 005012 

770 

771 005014 

772 005022 

773 5030 

774 005036 

775 =005042 

776 005044 

777 + 005046 
005052 
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000004 
047516 
030064 
030063 


012777 


174332 
015504 
015412 


174272 
015504 
015412 
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SYNC SPEED AND CHARACTER TERMINATE TEST 


5 FRA EERE EKER REE 


N SYNC SPEED AND CHARACTER TERMINATE TEST 


he Re crated eRe etter hee” a 


s*TEST 16 
TST16: SCOP 
516 

$40=30064 Z 

$30=30063 

MOV #377 ,aVSTERM 

MOV ~SYNSPD 

MOV #STATSA, SYNPIC 
1$: JSR RS5,DSPLA 

10000 

SYNPIC 

TST SWITCH 

BNE 1$ 

MOV #377 ,aVSTERM 

MOV #S40,SYNSPD 

MOV #STATSA! SYNC40,SYNPIC 
2$: JSR R5,DSPLA 

200 

SYNPIC 

TST SWITCH 

BNE 2$ 

MOV #377, wae 

MOV #S530,SYNSPD 

MOV #STATSA! SYNC30, SYNPIC 
3$: JSR R5,DSPLA 

200 

SYNPIC 

TST SWITCH 

BNE 3$ 


;ASCI1 VALUE FOR ‘'NO"' 
ee “oo ° 


;LOAD TERMINATE REG. 

‘LOAD SYNC ASCII VALUE 

;LOAD NO SYNC ENABLE 

DISPLAY THAT FRAME WITH ‘NO’’ SYNC 


TEST IF HOLD SET 
;BR IF HOLD 


;LOAD TERMINATE REG. 

;LOAD SYNC ASCII VALUE 

;LOAD SYNC ENABLE TO 40 

DISPLAY THAT FRAME WITH ‘40°’ SYNC 


:TEST IF HOLD SET 

:BR IF HOLD 

;LOAD TERMINATE REG. 
te ASCII Byers: ‘d 30 


AD 30 CPS_ENABL 
‘DISPLAY THAT FRAME AT ‘‘30°' SYNC 


TEST IF HOLD 
;BR IF HOLD 


SEQ 0038 
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007676 


026246 
041776 

000001 

005214 
000002 
010072 
001777 


000002 
010070 
005214 
173400 


010070 
010072 


010070 
010072 


010072 
001777 


010072 


010070 
040000 


MaCY11 ——" AI7-SeP=79" 08: 1* PAGE 14 
T17 0 ASH LINES AND BLINK 


Ff RRA REAR REE AREEREEEEEREREEEEREERERE EERE EKEEREERER EERE 


s*TEST 17 0 DASH LINES AND BLINK 


RAPS AASAESERAARAALALAAAASLALALALA LEASE LALA RRR RARER EAD DS 


TST17: SCOPE 
JSR R5,DSPLA ZEXIT TO DISPLAY A FRAME 
20000 


FRMES ;USING THE DASH AND BLINK 


SERRE REE KEER EERE RHEE EK 


S*TEST 20 P VECTOR SPRAY (LENGTH) TEST 


FERRER EERE AEE KARE REE REE EERE KEKE EREREEKEEEEEEREEEEEREKKEE 


TST20: SCOPE 
MOV 


F RAME 


#BUF FER ,RO ;LOAD BUFFER POINTER 
MOV HINTX !MAXX=1, DELTX6 ;LOAD X PRESET py 
MOV #1 ,DELTY6 LOAD Y PRESET VALUE 
1$: JSR PC; SPRAY ;LOAD INCREASING ANGLE VECTOR 
ADD #2 ,DELTY6 4 Ay TE Y LENGTH 
CMP DELTY6,AMAXY TEST IF END 
BLE 1$ BR IF NOT 
“ty ae SRESET MAX Y LENGTH 
3$: SUB #2 ,DELTX6 REDUCE X LENGHT 
CMP DELTX6,MINTX ;TEST IF END 
BLT 2$ BR IF DONE 
4$: ha. Tabac’ ;LOAD DECREASING ANGLE VECTOR 
2s: MOV A#DSTOP, (RO) + LOAD STOP 


MOV ADIMP, (RO) + 
MOV MF RMEG, (RO) + 
JSR R5,DSPLA 


RESTART DISPLAY FRAME 
:DISPALY PICTURE 


200 ; COUNT 
F RME6 
BR TST21 :;BR TO NEXT TEST 


SPRAY: MOV DELTX6, (RO) + ;LOAD X VECTOR LENGTH 
MOV DELTY6, (RO) + ;LOAD Y VECTOR LENGTH 
CLR (RO) + ;VECTOR BACK TO ORGIN 
CLR (RO) + 
RTS PC sEXIT 


SEQ 0039 


B 4 
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CZVSDC.P11 11-SEP-79 09:01 T21 Q HORIZONTAL PHOSPHOR TEST 


LTA A RARER ARERR EERERE EERE ER EERE RRR EERE EERE 


TEST 21 Q HORIZONTAL PHOSPHOR TEST 
FARRAR RAAEAAERAEREEE EAE EEREARRRAERREERARRERAERERARRRRRER ERE 
$121: 

016136 CL DELTX7 

000004 1$: #4, TEMPA ;LOAD DELAY COUNT 

007676 2s: J R5,DSPLA ZEXIT TO DISPLAY A FRAME 


;USING THE HORIZ FRAME 
007676 R5,DSPLA EXIT TO DISPLAY A FRAME 


wear THE PERIMETER BOX 

010012 TST SWITCH 3TEST THE ‘MOTION-SWiTCH"* 
BN 1$ BR IF dns | THE MOVEMENT 
007672 as DELAY DONE ? 


‘BR IF NOT 

016136 DELTX7 ;UPDATE THE X ORIGIN 
001777 016136 A add a ar END 

DUIS GOI IEEE IIIS IODIDE SISO IUIDIUIDINITI IOI IIOIDIEI I 

:*TEST 22 R VERTICAL PHOSPHOR TEST 

J TRAE RARER ERE REE REE EEREERERERREEEREE KEE 

TST22: 
016676 
016416 
000004 007672 1$: ;LOAD DELAY 


COUNT 
007676 2$: R5.DSPLA sEXIT TO DISPLAY A FRAME 


;USING THE VERT FRAME 
007676 45 R5,DSPLA sEXIT TO DISPLAY A FRAME 


;USING THE PERIMETER BOX 
007676 R5,DSPLA ;DISPLAY THE MENU BOX 


007676 R5,DSPLA ;DISPLAY THE TEST IN THE MENU 


DISPLAY THE 'MENU® PHOSPHOR PIC. 
010012 TST SWITCH ;TEST THE ‘MOTION-SWITCH'’ 
BN 1$ BR IF —' THE MOVEMENT 
007672 TEMPA :DELAY DONE ? 


2$ BR IF NOT 
001277 016676 #1277 ,DELT11 iTEST IF AT TOP OF MENU 

3$ F YES, DONT ADVANCE THE MENU 
016676 DELT11 “UPDATE THE Y MENU ORGIN 
016416 3$: DELTY7 [UPDATE THE Y ORIGIN 
001777 016416 #1777 ,DELTY7 STEST IF THE END 
1$ BR IF NOT 





aon 
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017250 
004537 
000001 
026246 
005337 
001321 
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626246 


007672 


007670 


017256 


017254 
017256 


017254 
017256 


017254 
017256 
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SHORT VECTOR AND RELATIVE POINT 


Sf RARER RARER EREAERARAEERERERAERRERERERERRAEREERARRRR ERE 


S*TEST 23 S 


SHORT VECTOR AND RELATIVE POINT 


5 RRA EERE RARE ERE EEEREREKEREEEEEREREEEEEEEEE ERE RERERERE 


T$123: 


#SHORTV, (RO)+ 
PC,LOADVT 
#RELATP. (RO)+ 


#BUF FER, (RO) + 
FIL14A 


LOADVT: #24,CNTR 

1$: MINTX+77,(RO)+ 
#4177, (RO)+ 
CNTR 

1$ 

PC 


3D 
FIL14A 
1$: #200,FRM14A 
#200,FRM14B 
R5,DSPLA 


#1400,FRM14A 
#200,FRM14B 
R5,DSPLA 


#1400, FRMIGA 
AMAXY-377,FRM14B 
R5,.DSPLA 


#200 ,FRM14A 
A#MAXY-377,FRM14B 
R5,DSPLA 


FRME 14 
sNOW DISPLAY THE SHORT VECTOR/RELATIVE 
JSR R5,DSPLA 


1 

BUFFER 

DEC TEMPA 
BNE 1$ 


SET UP RO 
;SET UP_INITIAL 
;X POSITION 


7Y¥ POSITION 

;LOAD ‘SHORT VECTOR'' 
sLOAD THE DISPLAY PATTERN 
;LOAD ‘RELATIVE POINT'' 
;LOAD THE DISPLAY PATTERN 
;LOAD ‘DISPLAY STOP*’ 

;LOAD ‘DISPLAY JUMP" 

:TO THE BUFFER ADDRESS 
;BR TO THE FRAME 


;LOAD A COUNTER 
;LOAD A DELTA Y 
;LOAD A DELTA X,Y 
FINISHED? 

;BR IF NOT 


ity FOUR SHORT VECTOR/RELATIVE POINT OCTAGONS IN DIFFERENT QUADRANTS 
MOV #6000, TEMPA :LO T 


AD COUNTER 
;LOAD FIRST OCTAGON 
;DISPLAY OCT. 


;LOAD SECOND OCTAGON 
DISPLAY 2ND OCT. 


;LOAD THIRD OCTAGON 


;LOAD FOURTH OCTAGON 
;DISPLAY 4TH OCT. 


POINT ao LINES 
Y BAR 


:DISPLA 


sFINISHED ? 
;BR IF NOT 





On 
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012737 


005037 
004537 


000004 
022224 
005237 
004537 
000001 
026246 
005537 
001361 


174100 
007676 


017406 
174110 


007650 
007676 


007654 
007656 


001324 
173142 


017406 


017406 


173342 


022414 
007654 


022446 
022444 


173144 
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GRAPHPLOT INCREMENT REGISTER TEST USING GRAPHPLOT X AND Y 





SEQ 0042 


FERRARA REE AREER EEE 


VATEST 24 T 


GRAPHPLOT INCREMENT REGISTER TEST USING GRAPHPLOT X AND y 


TUES EEE EIEIO SSI IOISIIEISISISIIOIUEIIOIOIIUIIIIUIEIUISISISIOIIDIOINIISI ER i iittt 


TST24: SCOPE 


MOV A#STATSB! INCR,GRPINC 


1$: JSR R5,DSPLA 
2000 
GRAPH 
INC GRP INC 
CMP ASTATSB! INCR+10,GRPINC 
BNE 1$ 


;LOAD peg INCREMENT VALUE 
[DISPLAY FRAME 


; UPDATE os VALUE 
TEST IF #10 
:BR IF NOT 


SRR RRR RRR ERE ERE RRR RR EERERERERERERRERE ERE KEK EEK KH 


INTENSITY LEVEL AND LIGHT PEN TEST 


FERRER EERE EER ER ERE REE EERE ERK EERE EEE ERE REE REE ERR EEK 


:*TEST 25 U 
TST25: SCOPE 
MOV #RET14,a@LPVCT 
MOVB $VECT1+1,@LPVCT1 
BIC #177400, aLPVCT1 
MOV #10,DSAVE1 
MOV #PENOF 0 ,MSOPEN 
MOV #PENOF 1 °MS1 PEN 
1$: MOV ey Bek | 
MOV #100,D 
MOV APOINT! INT7, (RO) + 
MOV #1400, (RO) + 
MOV #300, (RO) + 
JSR PC ,LOADUP 
MOV #DSTOP, (RO) + 
MOV ADIMP,, (RO) + 
MOV MBUFFER, (RO) + 
CLR HITCNT 
MOV #30060,FRM16B-2 
MOV #30060,FRM16B-4 
2$: CLR VIEW 
- R5,DSPLA 
FRME16 
INC VIEW 
= R5,DSPLA 
BUFFER 
DEC DSAVE 
BNE 2s 
DEC DSAVE1 
BNE 1 
MOV LPVCT1,@LPVCT 
CLR @LFVCT1 


;LOAD LIGHT PEN VECTOR 


;MASK 

SET UP COUNT 

RESET PEN MESSAGE #0 
RESET PEN MESSAGE #1 
;LOAD START ADDR. 


Y NT 
UP THE BUFFER 
© TOP 


AD DJUMP 

;LOAD RETURN ADDRESS 

:CLEAR HIT COUNT 

:PRESET THE HIT COUNT VALUE 


EXIT TO DISPLAY FRAME 
; SUB=PICTURE © 


EXIT TO DISPLAY FRAME 
HED ? 

NOT MINI-LOOP 
HED ? 


NOT 
VECTOR 


pais 


on 


E 
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CZVSDC.P11 11-SEP-79 09:01 EXT. DISPLAY STOP 

955 fF RARER ARERR REE EREERKER ARERR RERERERE EERE EH 
(3) **TEST 26 W DYNAMIC EXT. DISPLAY STOP 

(3) LEAR ARERR RERRERER REE RRR ARERR EERE RERARR ERE EEEERREREERE EERE 
(2) 006162 1726: SCOPE 

956 006164 013700 001242 MOV $VECT1,RO ;LOAD VECTOR POINTER 

957 006170 042700 160000 BIC #160000,RO *MASK 

958 006174 012720 006372 MOV #4$ (RO) + ;LOAD STOP VECTOR 

959 006200 012720 000200 MOV #200, (RO) + 

960 006204 012720 006456 MOV WBAD, (RO)+ :LOAD UNEXPT. INTR 

961 006210 012720 000340 MOV #340, (RO)+ 

962 006214 012720 006470 MOV #BAD2, (RO) + :LOAD UNEXPT. INTR 

963 006220 012720 000340 MOV #340, (RO)+ 

964 006224 012720 006502 MOV WBADS, (RD) + :LOAD UNEXPT. INTR 

965 006230 012720 000340 MOV #30, (RO) + 

966 006234 005037 177776 CLR PSW 

967 START DISPLAY AND DELAY 

968 006240 012777 024754 173016 MOV #FRME17,@DPC :START DISPLAY 

969 0062466 012702 000400 MOV #400,R2 “LOAD TIMER COUNTER 

970 006252 012700 001336 1$: MOV #BEGIN,RO :LOAD RANDOM NUMBER POINTER 
971 006256 112001 2$. MOVB _— (RO) +, R1 ‘GET A RANDOM NUMBER 

972 006260 042701 177700 BIC #177700,R1 ‘MASK OFF OTHER BITS 

973 006264 022700 026246 CMP #BUF FERRO :TEST IF DONE 

974 006270 001770 BEQ BACK 

975 006272 005037 007650 CLR DIDINT ; CLEAR "DID INTERRUPT ‘* FLAG 
976 (06276 005301 3$: DEC [DELAY 

977 006 001376 BNE 3$ 

978 NOW SET EXT. STOP FLAG 

979 006302 052777 000200 172766 BIS #B1T7,aDSR1 :SET EXT. STOP FLAG 

980 006310 012703 010 MOV #B1T12.R3 ‘LOAD DELAY COUNTER 

981 006314 017737 172744 001126 /7$: MOV aDPC ,S$BDDAT sTEST IF DPC IS OUT OF RANGE 
982 006322 012737 024754 001124 MOV #FRME17,$GDDAT ‘LOAD LOW LIMIT 

983 006330 023737 001124 001126 CMP SGDDAT, $8DDAT + COMAPRE 

984 006336 101 BHI BAD4 ‘BR IF TOO LOW 

985 006340 012737 025430 001124 MOV #FRM17F +4, $GDDAT *LOAD HIGH LIMIT 

986 006346 023737 001124 001126 CMP SGDDAT, $BDDAT > COMAPRE 

987 006354 103463 BLO BADS ‘BR IF TOO HIGH 

988 006356 005737 007650 TST DIDINT sTEST IF EXT. STOP INTR. OCCURRED 
989 006 001335 BNE 2$ ‘BR IF YES 

990 006364 005303 DEC R3 DELAY 

991 006 001352 BNE 7$ ‘BR AND TEST DPC VALUE 

992 006370 26 BR BADO NO EXT. STOP JNTR. REPORT ERROR 
993 006372 105777 172700 4$: TSTB ~—s @DSR1 ‘TEST IF EXT. STOP FLAG 

994 006376 100407 BMI $ ‘BR IF EXT. STOP 

995 006400 005777 172662 TST aDSsR TEST FOR DISPLAY STOP 

996 006404 100053 BPL BAD6 ‘BR IF 

997 006406 012777 024754 172650 MOV #FRME17, aDPC : START DPY IF NOT EXT. STOP 
998 006414 RTI RE TURN 

999 006416 00530 S$: DEC R2 “FINISHED ? 
1000 006420 001407 BEQ 6$ ‘BR IF DONE 
1001 006422 012777 000001 172634 MOV #B1T0,aDPC *RESUME THE DPU IF EXT. STOP AND NOT FILISHED LO 
1002 006430 052737 000001 007650 BIS #1,DIDINT ‘SET EXT. STOP FLAG DID INTR. 
1003 006436 RT] RETURN 
1004 006440 022626 rs 6$: CMP (SP)+, (SP)+ ; CLEAN THE STACK 
1005 006442 000137 006620 JMP SEOP 


ee ee ee ed ee eed ed ed 
lelelelelelelelelole) 
ee ed eed ed 8 ed 
WOONAUSWIR-O 


012737 
000432 


012737 
aecese 


00042 

012737 
022626 
000420 
012737 
022626 
000413 
012737 
000407 
012737 
000403 
012737 


017737 
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025462 
025516 


025562 


025626 


025672 
025712 
025734 


025450 
025450 


025450 


025450 


025450 
025450 
025450 
006612 


006614 
006616 


172520 
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;BR HERE IF AN ERROR OCCURRED 
BADO: 
BAD1: 


BAD2: 


BAD3: 


BAD4: 
BADS: 
BAD6: 


BADDON: 


PCERR: 
SRERR: 
SRIERR: 


17-SEP-79 08:50 PAGE 19 
DYNAM 


IC EXT. DISPLAY STOP 


(SP)+. (SP) + 
BADDON 
MWHY 2, WHY 
(SP)+, (SP) + 
BADDON 
AWHY3 , WHY 
(SP)+,(SP)+ 
BADDON 


MWHY6 , WHY 


@DPC,PCERR 
@DSR, SRERR 
@DSR1,SRIERR 


A#STOPI , @DDONE 


R5,DSPLA 


$EOP 


; INDICATE 
; INDICATE 


; INDICATE 


; INDICATE 


; INDICATE 
; INDICATE 
; INDICATE 
SAVE DPC 


;SAVE SR 
:SAVE SR1 








NO EXT. STOP INTERRUPT 


UNEXPECTED INTR. 


UNEXPECTED INTR. 


UNEXPECTED INTR. 


DPC WAS TOO LOW 
DPC WAS TOO HIGH 


DONE INTR. BUT NO FLAG 


;LOAD DISPLAY STOP VECTOR 
;DISPLAY ERROR MESSAGE 


;END OF PASS 


-C. UPON ERROR 


:SR1 UPON 


z0.P 
SR UPON ERROR 


ERROR 


G 4 
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CZVSDC.P11 11=SEP=79 09:01 T26 W DYNAMIC EXT. DISPLAY STOP SEQ 0045 
1063 
1044 .SBITL 
1045 
4 .SBTTL END OF PASS ROUTINE 
(2) DORI ISIOIIIIOIIOIIDIDIDIIOIOIIOIIIOIOIOIUIOIIDIUIDISIOIUIOIOIUIIUIDIDIDIDIDIUIDIDIDIDIDIDIDIDINIDIIDIO Dt 
(1) ;* INCREMENT THE PASS NUMBER ($PASS) 
(1) ;*IF THERES A MONITOR GO TO IT 
ai s*IF THERE ISN'T JUMP TO RESTAT 
(1) 
(1) 006620 SEOP: 
(1) 006620 000004 SCOPE 
(1) 006622 005037 001102 CLR STSTNM 2 ZERO THE TEST NUMBER 
<1) 006626 005237 001200 INC SPASS J ny hy oy THE PASS NUMBER 
(1) 006632 042737 100000 001200 BIC #100000, $PASS :2D0N"T ALLOW A NEG. NUMBER 
(1) 006640 005327 DEC (PC)+ ; ;LOOP? 
(1) 006642 000001 $EOPCT: .WORD 1 
(1) 006644 003013 BGT SDOAGN Pas 
(1) 006646 012737 MOV (PC)+,a(PC)+ 7 RESTORE COUNTER 
(1) 006650 000001 SENDCT: .WORD 1 
(1) 006652 006642 SEOPCT 
(1) 006654 013700 000042 $GET42: MOV a4%42,R0 2iGET MONITOR ADDRESS 
(1) 006660 001405 BEQ $DOAGN 7 BRANCH IF NO MONITOR 
(1) 006662 000005 RESET CLEAR THE WORLD 
(1) 006664 004710 $ENDAD: JSR PC, (RO) =260 TO MONITOR 
(1) 000240 NOP 3; 7 SAVE ROOM 
(1) 006670 000240 NOP 
(1) 006672 000240 NOP sACT11 
(1) 006674 $DOAGN: 
(1) 006674 000137 JMP a(PC)+ 7 RETURN 
one 006676 001520 $RTNAD: .WORD RESTAT 


H 4 
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.P11 11=SEP=79 09:01 T27 EYBOARD CHARACTER ECHO LOOP SEQ 0046 
STARA ARAAARAERRERERERAEEREKARERARARAEERAERERREKERERRRERER REE AEE 
TEST 27 V KEYBOARD CHARACTER ECHO LOOP 
FT RARER AREAARAAEARERRAEEAARARKKEAREREARRERRAAREAEKREREARERRARAERR 
TST27: 
024716 #30060,ECODEV-4 ;PRESET READOUT TO 00 
024720 #30060, ,ECODEV-2 ;PRESET READOUT TO 00 
20$: FFER,RO ;LOAD BUFFER POINTER 
2.,R) ;LOAD CHARACTER COUNT 
1$: 0) ;CLEAR THE _ BUFFER 
: FINISHED 
1$ ‘BR IF MOT 
#DIMP, (RO) + ;LOAD JUMP RETURN TO START SF BUFFER 
#ECHOFR, (RO) + FRAME 
024724 #161010,ECHIJMP 
IFTO 
1068 
i) 
1070 : 
1071 RS,DSPLA ‘DISPLAY FRAME AND BUFFER 
1072 000001 1 
1073 007016 024564 ECHOFR ;ADDRESS OF SUB-PICTURE 
1074 007020 000736 BR 20$ ;BR UPON EXT. STOP INTERRUPT 
1075 ;RETURN HERE UPON KEYBOARD INTR. <D.P.U. SHOULD STILL BE RUNNING> 
1076 007022 017703 172120 10$: MOV a$TKB,R3 ;READ KEYBOARD DATA 
1077 007026 042703 177600 BIC #1 77600, R3 _ MASK TO LOWER 7 BITS 
1078 007032 005301 DEC R1 sFINISHED INPUTING MAX. CHARS ? 
1079 007034 001443 BEQ 12$ ‘BR IF DONE MAX CHARACTERS INPUT 
1080 007036 022703 000003 CMP #3,R3 s TEST IF CHAR WAS A CTRL C ? 
1081 007042 001002 BNE 11$ :BR IF NOT 
1082 007044 000137 006620 JMP $EOP ;REPORT END OF FASS AND START OVER 
1083 007050 022703 000016 11$: C #16,R3 : TEST FOR SHIFT OUT CODE 
1084 007054 001005 BNE 4$ IF NOT 
1085 007056 005237 007650 INC SHIFTO :SET SHIFT OUT FLAG 
1086 007062 012737 164000 024724 MOV ADNOP , ECHJMP NOP THE BYPASS DISP. JMF 
1087 007070 005737 007650 4$: TST SHIF TO STEST IF SHIFT OUT 
1088 007074 001415 BEQ 2s ;BR IF NOT 
1089 007076 022703 000017 CMP #17,R3 : TEST FOR SHIFT IN CODE 
1090 007102 001005 BNE 5$ [BR IF NOT 
1091 007104 005037 007650 CLR SHIFTO ;CLEAR SHIFT OUT FLAG 
1092 007110 012737 161010 024724 MOV #161010,ECHJMP :LOAD BYPASS DISP. JMP 
1093 007116 122703 000037 5$: CMPB #37 ,R3 ‘TEST IF TOO BIG 
1094 007122 100002 BPL 2$ ;BR IF NOT 
1095 007124 042703 177740 BIC #177740,R3 sMASK OFF BITS 
1096 007130 110320 2s: MOVB R3, (RO) + :LOAD CHARACTER INTO NEXT BUFFER LOC. 
1097 007132 012702 024722 MOV #ECODEV,R2 ;LOAD POINTER TO ASCII CHARACTER VALUE WAS = 
1098 007136 004737 010014 JSR PC,KBCHR ; CONVERT —_— VALUE TO OCTAL 
1099 007142 000002 RTI SRETURN TO WAIT 
1100 007144 022626 12$: CMP (SP)+,(SP)+ sADJUST STACK 
1101 007146 013702 001264 MOV DPC Re :GET DPC ADDRESS 
1102 007152 052762 000200 000012 BIS #B1T7,12(R2) sEXTERNAL STOP TO DISPL 
1103 007160 000656 BR 20$ ;CLEAR THE BUFFER AND START AGAIN 
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CZVSDC.P11 11-SEP-79 09:01 SUBROUTINE FOR VERT. LIGHT PEN FIELD OF VIEW SEQ 0047 
1108 -SBTTL SUBROUTINE FOR VERT. LIGHT PEN FIELD OF VIEW 
1109 007162 012701 000030 LOADAC: MOV #24.,R1 LOAD COUNT 
1110 007166 012720 130000 MOV #RELATP, (RO)4 ;LOAD RELATIVE POINT 
1111 007172 012720 040004 1$: MOV MINTX+4,(RO)+ ; LOAD INTEN BIT 
1112 007176 005301 DEC R1 :FINISHED ? 
1113 007200 001374 BNE 1$ :BR IF NOT 
ve 007202 000207 RTS PC sEXIT 
1116 .-SBTTL SUBROUTINE FOR HORIZ. LIGHT PEN FIELD OF VIEW 
1117 04 012737 000030 007670 LOADUP: MOV #24.,CNTR AD COUNT 
1118 007212 004737 007162 1$: JSR PC ,LOADAC [LOAD ACCROSS 
1119 007216 012720 110000 MOV #LONGV, (RO) + ;LOAD LONG VECTOR 
1120 007222 012720 000004 MOV #4, (RO) + [LOAD VECTOR OVER 
1121 007226 012720 020140 MOV WMINUSX+140, (RO) + ;AND UP 
1122 007232 005337 007670 DEC CNT 
1123 007236 001365 BNE is ;BR_IF NOT DONE 
1150 007240 000207 RTS PC sEXIT 
1126 ; .SBTTL LIGHT-PEN INTERRUPT elds 
1127 007242 017737 172040 001126 RET14: MOV @VSCONS , SBDDAT #READ CONSOLE STATUS REG 
1128 007250 017737 172014 007660 MOV @XPOS , DSAVE2 READ X POSITION 
1129 007256 017737 172010 007662 MOV @YPOS , DSAVES :READ Y POSITION 
1130 007264 042737 176000 007660 BIC #176000, DSAVE2 :MASK HIGH SIX BITS 
1131 007272 042737 176000 007662 BIC #176000 ,DSAVE3 
1132 007300 005037 007646 CLR 40$ :CLEAR SWITCH FLAG HAPPEN LOC. 
1133 007304 032737 000100 001126 BIT #6116,$BDDAT TEST IF CONSOLE #1 SWITCH FLAG 
1134 007312 001405 BEQ $ BR IF NOT 
1135 007314 012737 022534 022414 MOV #PENOF 1 ,MS1PEN ; INFORM PEN OF ON #1 SET 
1136 007322 005237 007646 INC 40$ ;SET SW HAPPENED FLAG 
1137 007326 032737 000200 001126 3$: BIT #B1T7,$BDDAT TEST IF CONSOLE #1 SWITCH FLAG 
1138 007334 001405 BEQ 4$ BR IF NOT 
1139 012737 022564 022414 MOV #PENON1 ,MS1PEN ; INFORM PEN ON #1 Ry 3 
1140 007344 005237 007646 INC “ SET SW HAPPENED 
1141 007350 032737 010000 001126 4$: BIT #B1T12,$BDDAT TEST IF CONSOLE 70 Sul TCH FLAG 
1142 007356 001405 BEQ 5$ BR IF NOT 
1143 007360 012737 022454 022344 MOV #PENOF 0 ,MSOPEN ; INFORM PEN OFF #0 SET 
1144 007366 005237 007646 INC - 40$ >SET Sw HAPPENED FLAG 
1145 007372 032737 020000 001126 5$: BIT #B1T13,$BDDAT TEST IF CONSOLE #0 SET 
1146 007400 001405 BEQ $ BR IF NOT 
1147 007402 012737 022504 022344 MOV #PENONO ,MSOPEN ; INFORM PEN ON #0 SET 
1148 007410 005237 007646 INC 40$ 7SET SW HAPPENED FLAG 
1149 007414 005737 007646 6$: TST 40$ STEST IF SWITCH FUNCTION 
1150 007420 001003 BNE 12$ :BR IF YES 
1151 007422 005737 007650 TST VIEW TEST IF FIELD OF VIEW 
1152 007426 001043 BNE 20$ ;BR IF YES 
1153 7430 032737 040000 001126 128: BIT #B1T14,$BDDAT TEST IF PEN FLAG #0 SET 
1154 7436 001414 BEQ 7$ :BR IF NOT 
1155 007440 013703 007660 MOV DSAVE2,R3 ;LOAD R3 : 
1156 007444 012702 022320 MOV HDLT14A+4,R2 [LOAD ADDRESS 
1157 007450 004737 010014 JSR PC,KBCHR : LOAD X_READOUT 
1158 007454 013703 007662 MOV DSAVE3,R3 ;LOAD R3 
1159 007460 012702 022332 MOV #DLT14B+4 ,R2 LOAD ADDRESS 
1160 007464 004737 010014 JSR PC ,KBCHR ;LOAD Y READOUT 
1161 007470 032737 000400 001126 7$: BIT #8118, $BDDAT TEST IF PEN #1 FLAG 
1162 007476 001414 BEQ 10$ :BR IF NOT 
1163 007500 013703 007660 MOV DSAVE2,R3 GET X VALUE 


J 4 
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CZVSOC.P11 11-SEP-79 09:01 LIGHT=PEN INTERRUPT SERVICE SEQ 0048 
1164 007504 012702 022370 MOV ADLT14C+4,R2 ;LOAD POINTER 
1165 007510 004737 010014 JSR at KBCHR CONVERT TO ASCII 
1166 007514 013703 007662 MOV SAVE3,R3 ;GET Y VALUE 
1167 007520 012702 022402 MOV wDLT Tab e6, R2 ;LOAD POINTER 
1168 007524 004737 010014 JSR PC ,KBCHR CONVERT TO ASCII 
1169 007530 012716 007716 10$: MOV #RESUME , (SP) ; FIX RETURN PC... 
Wy 007534 000002 RT] ;..AND RESUME. 
Ne ;COME HERE IF LIGHT-PEN HIT DURING THE FIELD OF VIEW SUB-PICTURE 
1174 007536 005237 007652 208: INC HITCNT ; UPDATE ny! 
1175 007542 013703 007652 MOV HITCNT ,R3 LOAD COUNT 
1176 007546 012702 022450 MOV #FRM168 ,R2 LOAD MESSAGE POINTER 
1177 007552 004737 010014 JSR PC ,KBCHR :CONVERT TO ASCII 
1178 007556 005001 CLR R1 
1179 005002 CLR Re 
1180 007562 013700 007660 MOV DSAVE2,RO GET & AXIS 
1181 007566 162700 001400 SUB #1400,R0 GET A BASE ADDRESS 
1182 007572 006200 ASR RO 
1183 007574 0062 ASR RO 
1184 007576 001404 BEQ 30$ 
1185 7600 062701 000070 21$: ADD #70,R1 UPDATE OFFSET 
1186 007604 5 DEC RO 
1187 007606 001374 BNE 21$ :BR i DONE 
1188 007610 013700 007662 30$: MOV DSAVE3,RO GET Y AXIS 
1189 007614 162700 900304 SUB #304 ,RO MAKE "BASE ADDRESS 
1190 007620 006200 ASR RO 
1191 007622 006200 ASR RO ;SHIFT RIGHT 
1192 007624 001404 BEG 32$ 
1193 7626 062701 000002 31$: ADD #2,R1 
1194 007632 005300 DEC RO 
1195 007634 001374 E 31$ 
1196 007636 042761 040000 026256 32$: BIC #INTX ,BUFFER+10(R1) CLEAR THE BIT 
; Lb 4 007644 000731 BR 10$ 
hh 007646 000000 40$: 0 
1201 007650 SHIF TO: 
1202 007650 DIDINT: 
1203 007650 000000 VIEW: 0 
1204 007652 000000 HITCNT: O 
1205 007654 000000 DSAVE: 0 
1206 007656 000000 DSAVE1: 0 
1207 7 000000 DSAVE2: 0 
1208 007662 000000 DSAVE3: 0 
1209 007664 000000 HOLD 0 
1210 7666 000000 TSAVE: 0 
1211 007670 000000 CNTR 0 
1212 007672 000000 TEMPA: 0 
1213 007674 000000 TEMPB: 0 
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C2vebe. P11 11=SEP=79 09:01 DISPLAY SUBROUTINE SEQ 0049 
aR -SBTTL DISPLAY SUB=ROUTINE 
1217 ; ARGS ARE LOOP COUNT AND DISPLAY BUFFER ADDRESS 
1218 ; UPON INTERRUPT , DEC LOOP COUNT 
1219 ; RESUME DISPLAY IF NOT 0 
1ss0 : RTS RS IF COMPLETED 
1222 007676 012537 010006 DSPLA: MOV (R5)+,COUNT ; ITERATION COUNT. 
1223 007702 012537 010010 MOV (R5)+,F ILE :DISPLAY FILE ADDRESS. 
1224 007706 013777 010010 171350 MOV ht @DPC START DISPLAY 
1225 007714 000403 BR +10 
1226 007716 012777 000001 171340 RESUME: MOV in - @DPC _ sRESUME DISPLAY. 
1227 007724 005037 177776 1$: CLR PSW 
1228 007730 000001 WAIT 
ice) 007732 000774 : BR 1$ ;LOOP BACK 
\sss RETURN HERE UPON STOP INTERRUPT 
1233 007734 005337 010006 STOFI: DEC COUNT FINISHED LOOPING ? 
1234 007740 001403 BEQ 1$ ; BR IF SO. 
1235 007742 012716 007716 MOV #RESUME , (SP> ; RESUME... 
ics 007746 000002 RTI ;..-OTHERWISE. 
1238 007750 105777 171164 1$: TSTB aSWR KEYBOARD CONTROL ?? 
1239 007754 100410 BMI 2s EXIT IF SO. 
1240 007756 005037 010012 CLR SWITCH 
1241 007762 032777 001000 171150 BIT #B1T9,ASWR TEST SWITCH BIT 9 
1242 007770 001402 BEQ 2$ 
1243 007772 005137 010012 COM SWITCH SET FLAG IF SWR 9 = 
1244 007776 012716 010004 2$: MOV #3$, (SP) ; FIX RETURN PC... 
1245 010002 000002 RTI 3..-AND... 
ies 010004 000205 3$: RTS R5 3 ..-RETURN TO CALLER. 
1248 010006 000000 COUNT: 0 
1249 010010 000000 FILE: 


0 
1250 010012 000000 SWITCH: 0 


CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17-SEP-79 08:50 PAGE 24 
CZVSDC.P11 11-SEP-79 09:01 UPDATE OCTAL READOUT OF THE X=Y FOR LIGHT PEN HIT SEQ 0050 


-SBTTL UPDATE OCTAL READOUT OF THE X=Y FOR LIGHT PEN HIT 
; CALL: tad VAL ,R3 ; VALUE TO ENCODE. 


D 
V ADDR,R2 ; ADDRESS OF LO ORDER CHAR +1. 
JSR PC,KBCHR ; ENCODE 4 DIGIT OCTAL ASCII. 





010054 KBCHR: 
010046 
010046 
010046 


: MOV R3,R4 
177770 #177770,R4 
000060 


° 


DELTX6: O 
DELTY6: 0 


CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17-SEP-79 08:50 PAGE 25 
CZVSDC.P11 11-SEP-79 09:01 X = Y POSITIONS FOR THE SHORT TERM DRIFT TEST SEQ 0051 


-SBTTL X = Y POSITIONS FOR THE SHORT TERM DRIFT TEST 


000000 TABA: 
1006.4 060°. 


“WOR 
000000 ‘ RAKY 0,MAXY,0,MAXY 
‘ 1600; 1606 
001777 : Peay. MAXX ,MAXY , MAXX ,MAXY 
‘ 1000. 1000 
001777 7 MAXX.0,MAXX,0,MAXX,0 
1000. 1000 
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CZVSDC.P11 11-SEP-79 09:01 DIRECTORY SUB-PICTURE SEQ 0052 


010176 FRMEO: POINT! INT4 
010200 000000 0 
MAXY=177 
CONSLO'BIT7!BIT6 ;ENABLE CONSOLE #0 
CONSL1!BIT?!B1T6 [ENABLE CONSOLE #1 
053040 /VS60 VISUAL DISPLAY TEST < CZVSDC >/ 
012 BYTE 4B 
DIRECTORY OF THE TESTS/ 
: 251° DIRECTORY FRAME/ 
ASTIGMATISM AND SETTLING/ 
SHORT TERM DRIFT/ 
MINOR AXIS GAIN/ 
MAJOR AXIS OFFSET/ 
VECTOR LENGTH GAIN/ 
PINCUSHION/ 
OCTAGONS AND CIRCLES/ 
SCISSORING AND VECTOR SCALES/ 
X AND Y DYNAMIC OFFSET TEST/ 
CHARACTER SCALE/ 
CHARACER QUALITY AND CHARACTER ROTATE/ 
CHARACTER SET, SUPER AND SUBSCRIPT, AND ITALIC CHARACTERS/ 
SYNC SPEED AND CHARACTER TERMINATE/ 
DASH LINES AND BLINK/ 
VECTOR LENGTH/ 
HORIZONTAL PHOSPHOR TEST/ 
VERTICAL PHOSPHOR TEST/ 
SHORT VECTORS AND RELATIVE POINT/ 
GRAPHPLOT X AND GRAPHPLOT Y TEST/ 
INTENSITY LEVEL AND LIGHT PEN TESTS/ 
KEYBOARD CHARACTER ECHO LOOP/ 
DYNAMIC EXTERNAL STOP TEST/ 


SABES 


. 
—i- it 
Nm 
Oo 
Nm 


KARA 


031460 
030040 
030040 
030040 
033460 
030440 
030461 
030440 
030440 
030440 
030440 
030440 
033461 
031040 
031040 
031062 
031040 
032062 
031040 
031040 
033462 

012 


WWWNWWWANWG 
oO 
Ww 


. 
Nm 


Ww 
oS 
So 
~ 


. 
Nm 


WW 
WW 
MIMMDUOMNDUhrPuw WN 
. 
Nm 
oO 
w 


RARAR 
. 
Nm 


sls 


. 


So 

ise) 

o 
o-o-o-0o= 


Nm 


Oo 
Nw 
=f 


™m 
—_ «A 
Nm 


. 


Nm 


. 
="-n" nen ene eae 
Nm 
— 
Ww 


AAAARRELELELEL 
WHO VOOn RAUSWH-O”O 


Nm 


. 


Nm 
_ 
~*~ 


Nm 
_ 
Ww 


DNR 
— 
oa 


nm 


WWWWWWWWWG 


Ww 
Oo 


So 
3 
o-0-0-0-0- 0-0-0 


N 


Nm 
nyo — 
So 


. 
ee ee ee ee ee 


MIO UNUM SS UIWWTP 1 MIO NV 


Nm 
— 


Nm 
Nm 


~rmMN NY MY DWH KF NW 
wn 


a 


SERERECES 


lelelelelelelelelelelelojlelelelo) 


Nm 


. 


R 


mM 


. 


od et os = SS OS Ss SS 
—_ > 


Nm 


. 


NNNNNSN 
WN=3S 
o 


wis 
nm 


— 


wR NRA RAs RS Rs RS BSS BS WS BAS NAS NAB DBA SOV DAB DO DOs SO OO 


VWEM<= NC MNAMNNMADM1O AVN 1 ZN ZV AKO Me WIEN 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
i 
1 
1 
1 
1 
1 
1 
1 
1 
; 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 
1 
1 
1 
1 
1 
1 
1 
1 


WINIWIN WW 
ie J 
Nm 


2 
011775 


Oo 
—_ 
Nm 
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CZVSDC.P11 11-SEP-79 09:01 DIRECTORY SUB-PICTURE SEQ 0053 


1377 012000 co wens 047502 -ASCII ‘6 ea (DELETE) TO LOOP ON CURRENT PATTERN/ 


1378 ° 
020040 051103 052040 / CR TO STOP FRAME MOTION, SPACE TO RESUME/ 
or ate3 000 ow <15><12> 


3 


“EVEN 
CONSL 1 !BIT7 :DISABLE CONSOLE #1 
044124 051511 -ASCIZ / THIS IS CONSOLE 0/<15><12> 
Yo: BIT7 :DISABLE CONSOLE #0 
et arr “ENABLE CONSOLE #1 
044124 051511 “ASCIZ / THIS IS CONSOLE 1/<15><12> 


SESeeeEees 


nw 8 


PSGSS 


“EVEN 
CONSLC!BIT7!BIT6 : ENABLE CONSOLE #0 
DSTOP 


DJMP 
F RMEO 


kk ke dk od a td ot 
o 
Ww 


Sy 
SE 


-SBTTL X AND Y POSITIONS FOR THE SETTLING TEST 
CONSL1!BIT7!BIT6 ENABLE CONSOLE 41 
POINT 

INTX!BIT9 

BIT9 

INTX!BIT8 

BIT8 


INTX!BIT7 
BIT7 
INTX!BIT6 
BIT6 
INTX!BITS 
BITS 
INTX!BIT4 
BITS 
INTX!BIT3 
BIT3 
INTX!BIT2 
BIT2 
INTX!BIT1 
BIT1 
INTX!BITO 
BITO 

INTX 

0 


INTX! 1400 
BIT 
INTX! 1600 
BIT7 
900100 alte 
012324 INTX!1740 





CZVSDC _VS60 VISUAL DISPLAY TEST 
11-SEP-79 09:01 


CZVSDC.P11 


012416 
012420 


012470 


160000 
012230 


MACY11 30G6(1063) 
X AND Y POSITIONS FOR THE SETTLING TEST 


BITS 
INTX! 1760 


BITS 
INTX!1770 
BIT3 
INTX!1774 
BIT2 
INTX!1776 
BIT! 
INTX!1777 
BITO 


INTX! 1400 
1400 
INTX! 1600 
1600 
INTX! 1700 
17 
INTX!1740 
1740 
INTX! 1760 
17 

A ly 
INTX!1774 
1774 
INTX!1776 
1776 
INTX!1777 
1777 


INTX'BIT8 
1400 
INTX!BIT7 
1600 

yt Sats 
INTX!BIT5S 
1740 
INTX!BIT4 
176 
INTX!BIT3 
1770 
INTX!BIT2 
1774 
INTX!BIT1 
1776 
INTX!BITO 
“777 


. 2 
17=SEP=79 08:50 PAGE 26-2 


RETURN ADDRESS 


SEQ 0054 


yuo 
NONMINONMINN NN NY @ @ 2 PS Ps OO Om HO 
SOMNANRWN OOS 


CONOAUISWh— 


BYRAKUNILSS 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


DAAAAAAA AGIA AGIA IAI IT OIA UIT ITT 





CZVSDC.P11 


012472 
012474 


012554 
012556 


012624 


012626 
012630 
012632 


CZVSDC _VS60 VISUAL DISPLAY TEST 
11-SEP-79 09:01 


040000 
001777 
061777 
000000 


040000 
021777 


060000 
001777 
041777 
020000 
060000 





D 
17=SEP=79 08:50 PAGE 27 
X AND Y POSITIONS FOR THE SETTLING TEST 


MACY11 30G(1063) 


FILE 2 <ANALOG TUNE-UP TEST > 


CONSL1!BIT7!RIT6 
ZINTENSIEY A POINT 3 TIMES IN EACH CORNER 


MAXY 
NOW DRAW pe | OUTER REF. 


MAXY 
" iomiahaatiasistn-icteas 


INUSY !MAXY 
NOW ae de 3 * WITH NEGATIVE SIGN BITS 


: Y 
INTX !MINUSX !MAXX 
MINUSY 
;NOW DRAW LOWER LEFT TO UPPER RIGHT DIAG. 
INTX !MAXX 


MAXY 
INTX !MINUSX !MAXX 





;ENABLE CONSOLE 41 
LOWER LEFT 


;LOWER RIGHT 











;UPPER RIGHT 


; UPPER LEFT 


+Y 
+Y 
+Y 
=¥ 





E 
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CZVSDC.P11 11-SEP-79 09:01 xX AND Y POSITIONS FOR THE SETTLING TEST SEQ 0056 
1842 012634 021777 MINUSX 'MAXY 
1543 a TO LOWER RIGHT AND DRAW LOWER RIGHT 
1544 z O UPPER LEFT DIAG. 
1545 012636 001777 ma 
1546 012640 000000 0 
1547 012642 061777 INTX!MINUSX ! MAXX 
1548 012644 001777 MAXY 
1549 012646 041777 INTX !MAXX 
1550 012650 021777 MINUSX !MAXY 
1551 -SBTTL MENU 1 SUB=PICTURE 
1552 7 DRAW REF. BOX IN THE MENU 
1553 012652 170003 DMENU1 ZS ENABLE -MENLE 
1554 012654 114000 POINT 
1555 012656 000000 0 
1556 012660 000000 0 
1557 012662 110000 LONGV ;DRAW REF. BOX 
1558 012664 040177 INTX!177 
1559 012666 000000 0 
1560 012670 040000 INTX 
1561 012672 001777 MAXY 
1562 012674 060177 INTX!MINUSX!177 
1563 012676 000000 0 
1564 012700 040000 INTX 
1565 012702 021777 MINUSX !MAXY 
1566 ;NOW REVERSE THE DRAWING PROCEDURE 
1567 012704 060000 INTX !MINUSX 
1568 012706 001777 MAXY 
1569 012710 040177 INTX!177 
1570 012712 020000 MINUSX 
1571 012714 060000 INTX !MINUSX 
1572 012716 021777 MINUSX !MAXY 
1573 012720 060177 INTX 'MINUSX ! 1177 
1574 012722 020000 MINUSX 
1575 ;NOW DRAW THE DIAG. X IN THE MENU 
1576 012724 040177 INTX!177 . s;LOWER LEFT, IN MENU, TO UPPER RIGHT 
1577 012726 001777 MAXY 
1578 012730 060177 INTX!MINUSX! 177 
1579 012732 021777 MINUSX ! MAXY 
15 012734 000177 177 sREPOSITION TO LOWER LEFT OF MENU 
1581 012736 000000 0 
012740 060177 INTX!MINUSX! 177 ;LOWER RIGHT TO UPPER LEFT 
1583 012742 001777 MAXY 
1584 012744 040177 INTX!177 
1585 012746 021777 MINUSX 'MAXY 
1586 012750 170002 DMENUO sRETURN TO MAIN SCREEN 
1587 7; CONTINUE MAIN SCREEN PICTURE 
1588 012752 114000 POINT 
1589 012754 001400 1490 
1590 012756 0601000 1000 
1591 DRAW A t~ — BOX, SAME METHOD AS OUTER REF. BOX 
1592 012760 110000 
1593 012762 040144 tNTN' 100. 7 4M, +Y 
1594 012764 000000 0 
1595 012766 040000 INTX : +k, +Y 


é 100. 
1597 012772 060144 INTX!MINUSK!100. 3 =, oF 


CZVSDC _VS60 VISUAL DISPLAY TEST 


CZVSDC.P11 


1598 
1599 


1600 
1601 


3s 


SEeRae 


AXAAARAXRAXAO 


me a a odd 2 ot 2) ot 2 SS 
a et ed ed ed od wd 


SOOONAUSWN oO 


& 


1621 


012774 
012776 


— I SY SY YI SS - I 


oOo 
ad ok 
WWW 
at ont 
ar 
BM 


11-SEP-79 09 


060000 
020012 
0400 


;DRAW A 


;DRAW FOUR VECTORS FROM A “‘COMMON’’ POINT WHICH WILL BE THE 
encthemae Sy UPON BY THE NEXT SUB-PICTURE 


MACY11. 30G(1063) 
:01 MENU 1 SUB=PICTURE 


A 
17=SEP=79 08:50 PAGE 27-2 


INTX s OK, 
MINUSY!100. 

MINUSY 

cata 5 “A, 
INTX!MINUSX! 100. 3 Ky 
MINUSY 

INTX!MINUSX 3K, 
MINUSY!100. 

INTX! 100. 

100. 

INTX!MINUSX!10C. 

MINUSX!100. 

is 

INTX!MINUSX! 100. 

100. 

INTX! 100. 

MINUSX!100. 

10 UNIT BOX, SAME METHOD AS OUTER BOX 
POINT 

1400 

700 

LONGV 

INTX!10 ; The 
an ‘ 42, 
" Prlasateninams sic 3; =k, 
INTX e hs 
MINUSY!10. 

INTX!10. 3 #A, 
MINUSY 

en s =, 
INTX!MINUSX!10, 5 wh, 
MINUSY ihe c 

INTX!MINUSX SR, 
MINUSY!10. 

ra: 


0. 
INTX!MINUSX!10. 
me 


0 
* Wapitiaeeneechies 


INTX!10. 
MINUSX!10. 


1000 


SEQ 0057 


CZVSDC VS60 VISUAL dg 


CZVSDC.P11 


1668 


AAO RAR AAA AARAAAA AAA AAA A AAA 
kk a ek ks a th a St od os I 2 St SS os So SS a SS 
ee NNN Ne eee ee es es es Se SY we YY we 


SERESEESES 


013220 
013222 


013322 


11-SEP-79 





G 5 
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MENU 1 SUB=-PICTUR 


LONGV 
 laacmee es 
3 DRAW 10 VERTICAL VECTORS IN THE LEFT CENTER AERA 


SHORTV 

INTX !MINUSX ! 10 
RELATP 

yen: 2 


SHORTV 
INTX!10 
RELATP 
INTX!2 


SHORT V 
INTX!MINUSX! 10 
RELATP 
INTX!2 


2 
SHORTV 
INTX!10 
RELATP 
INTX!2 


SHORTV 
INTX !MINUSX! 10 
RELATP 
pants 


;DRAW A 8. UNIT VERTICAL VECTOR 


: INTENSIFY A POINT 2 UNITS AWAY 
sMOVE THE Y AXIS 


;DRAW A 8. UNIT VERTICAL VECTOR 


; INTENSIFY A POINT 2 UNITS AWAY 
sMOVE THE Y AXIS 


;DRAW A 8. UNIT VERTICAL VECTOR 


INTENSIFY A POINT 2 UNITS AWAY 
sMOVE THE Y AXIS 


;DRAW A 8. UNIT VERTICAL VECTOR 


"; INTENSIFY A POINT 2 UNITS AWAY 
MOVE THE Y AXIS 


;DRAW A 8. UNIT VERTICAL VECTOR 


INTENSIFY A POINT 2 UNITS AWAY 
;MOVE THE Y AXIS 


;DRAW A 8. UNIT VERTICAL VECTOR 


INTENSIFY A POINT 2 UNITS AWAY 
:MOVE THE Y AXIS 


SEQ 9058 


H 5 
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CZVSDC.P11 11=SEP=79 09:01 DRAW 10 VERTICAL VECTORS IN THE LEFT CENTER AERA SEQ 0059 


013324 SHORT V 


- 
— 
~~ 


INTX!10 
RELATP 
INTX!2 


SHORTV - - 
INTX!MINUSX! 10 
RELATP 

INTX!2 


2 

SHORTV 

INTX!10 

RELATP 

INTX!2 

2 

SHORTV 
INTX!MINUSX! 70 
RELATP 

INTX!2 


;DRAW A 8. UNIT VERTICAL VECTOR 


; INTENSIFY A POINT 2 UNITS AWAY 
sMOVE THE Y AXIS 


;DRAW A 8. UNIT VERTICAL VECTOR 


; INTENSIFY A POINT 2 UNITS AWAY 
sMOVE THE Y AXIS 


;DRAW A 8. UNIT VERTICAL VECTOR 


; INTENSIFY A POINT 2 UNITS AWAY 
sMOVE THE Y AXIS 


;DRAW A 8. UNIT VERTICAL VECTOR 


; INTENSIFY my Rs « ge 2 UNITS AWAY 


ee ee ee ee ee ee ee ee ee 
— aes eet oo os ot os SS tt ot OS a 
wee ONO ies Ss tr wo ww SY we 


040002 
013372 2 SMOVE THE Y 
.SBTTL DRAW THE DELAY INTENSITY. SUBSPICTURE iN” THE LEFT CENTER AERA 
DRAW 8 gigs: USING BASIC VECTOR INSTRUCTION AWAY FROM A COMMON POINT 
BUT OFFSET BY ONE UNIT. 
THE COMMON POINT X=353 AND Y =1003 


XQ6=353 


013374 


BASICV 

INTX!PATHO!LQ6 

POINT 

xQ6+1 

YQ6+1 sVECTOR #1 
BASICV 

INTX!PATH1!LQ6 

POINT 

xQ6 

YQ6+1 sVECTOR #2 
BASICV 

INTX!PATH2!LQ6 

POINT 

xXQ6-1 

YQ6+1 sVECTOR #3 
BASICV 

INTX!PATH3!LQ6 

POINT 

xXQ6-1 

YQ6 sVECTOR 44 


BASICV 
INTX!PATH4!LQ6 
POINT 


MN 
—OOONAUSWN—O 


VONVUNAASIIAAIIAAASS 


~~ 2 SS SS SS 2 SS es SS Ss SS os HS es 


MHoNMNoN 
NOUS W 


sVECTOR #5 
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CZVSOC.P11 11-SEP-79 09:01 DRAW THE DELAY INTENSITY SUB=PICTURE IN THE LEFT CENTER AERA SEQ 0060 
1728 013464 120000 BASICV 
1729 013466 066040 INTX!PATH5S!LQ6 
1730 013470 114000 POINT 
1731 013472 000353 xQ6 
1732 013474 001002 YQ6~1 VECTOR #6 
1733 013476 120000 BASICV 
1734 013500 072040 INTX!PATH6!LQ6 
1735 013502 114000 POINT 
1736 Bl gene 000354 XQ6+1 
1737 013506 001002 YQ6-1 VECTOR #7 
1738 013510 120000 BASICV 
44 2 013512 076040 INTX! PATH7!LQ6 
1741 013514 173400 DSTOP 
1742 013516 160000 DJMP 


1743 013520 012472 F RME 2 


CZVSDC VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17=SEP=79 08:50 PAGE 28 
CZVSOC.P11 11-SEP-79 09:01 OCTAGONS USING LONG AND ABSOLUTE VECTORS (WIDTHS OF 7,77,177,377 AND 520) SEQ 0061 


-SBTTL OCTAGONS USING LONG AND ABSOLUTE VECTORS (WIDTHS OF ie 77,177,377 AND 52 
“SBTTL CIRCLES USING ABSOLUTE VECTORS (WIDTHS OF 64., 128., AND 256.) 


POINT 

774 

764 

CONSL1!BIT7!BIT6 ;ENABLE CONSOLE 41 
LONGV ;OCTOGON BY LENGTH OF 7 
INTX+7 

0 

INTX+7 

7 

INTX 

7 

meatmenate’ 

INTX!MINUSX+7 

INTX !MINUSX+7 


ee Ne Ne eee ae ae le 


( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 


013572 7 MINUSX+7 





CZVSDC _VS60 VISUAL DISPLAY TEST 


CZVSOC.P11 


1791 


33 


wy 3 Ss SS) Ss SS SS) 9 os - 3 


S 


RERSSSEUROE 


B85 


= 
co 
_ 
So 


ee ee ed ed ed eed 
Oo 00 00 Co Oo Oo 00 00 CO 
— 4 YY I 1 
WONAUSWR = 


1820 


11-SEP-79 


3s VS 8 SS 
SESS 
NW 


aooo 
NNNN 
NOUS UI 


SESSERRRLRRRLLRLLRLLK 
88888 


09:01 


K 
MACY11 30G(1063) 17=SEP=79 08:50 PAGE 29 
CIRCLES USING ABSOLUTE VECTORS (WIDTHS OF 64., 128., AND 256.) 


CIRCLE 8 DEG. RADIUS OF 64 


ENABLE ABSOLUTE VECTOR MODE 


SEQ 0062 


L 
CZVSDC _VS60 VISUAL DISPLAY ror MACY11 30G(1063) 17=SEP=79 08:50 PAGE 29-1 


C2VSDC.P11 11-SEP-79 09:0 CIRCLES USING ABSOLUTE VECTORS (WIDTHS OF 64., 128., AND 256.) SEQ 0063 
1829 :CIRCLE 8 DEG. RADIUS OF 128 
1831 014102 114000 POINT 
1832 014104 001177 177 
1833 014106 000777 777 
1834 014110 144 ABSVCT :DISPLAY IN ABSOLUTE VECTOR MODE 
1835 014112 041176 001021 .WORD _INTX!1176,1021 
1836 014116 041172 001042 "WORD —INTX!1172.1042 
1837 014122 041164 001063 "WORD _INTX!1164.1063 
1838 014126 041154 001103 "WORD _-INTX!1154.1103 
1839 014132 041141 001121 "WORD - INTX!1141.1121 
1840 014136 041125 001136 "WORD INTX!1125.1136 
1841 014142 041107 001151 "WORD INTX!1107.1151 
1842 014146 041067 001162 WORD INTX!1067.1162 
1843 014152 041047 001171 WORD INTX!1047.1171 
1844 014156 041025 001175 WORD INTX!1025.1175 
1845 014162 041 001177 "WORD INTX!1003.1177 
1846 014166 040763 001176 "WORD INTX!763,1176 
1847 014172 040741 001173 "WORD  INTX!741.1173 
1848 014176 040720 001166 "WORD _INTX!720.1166 
1849 014202 040700 001156 “WORD _INTX!700.1156 
1850 014206 040661 001144 “WORD INTX!661.1144 
1851 014212 040644 001130 "WORD _INTX'644.1130 
1852 014216 040630 001112 "WORD INTX!630.1112 
1853 014222 040617 001073 "WORD INTX!617.1073 
1854 014226 040610 001053 "WORD INTX!'610.1053 
1855 014232 040603 001032 "WORD INTX'603.1032 
1856 014236 040600 001010 "WORD _INTX!600.1010 
1857 014242 040600 7 “WORD _INTX!600.767 
1858 014246 040603 000745 "WORD INTX!603.745 
1859 014252 040610 000724 "WORD INTX!'610.724 
1860 014256 040617 000704 "WORD INTX!617.704 
1861 014262 040630 000665 "WORD INTX!630.66 
1 14266 040644 000647 WORD  INTX!644.647 
1863 014272 040661 000633 "WORD _INTX'661.633 
1864 014276 040700 000621 "WORD INTX! 700.621 
1865 014302 040720 000611 "WORD INTX! 720.611 
1 14306 040741 "WORD INTX! 741.604 
1867 014312 040763 000601 WORD INTX!763.601 
1868 014316 041003 000600 WORD INTX!1003%,600 
1869 014322 041025 000602 WORD INTX!1025.60 
1870 014326 041047 000606 “WORD INTX!1047.606 
1871 014332 041067 000615 "WORD _INTX!1067.615 
1872 014336 041107 000626 "WORD _INTX!1107.626 
1873 014342 041125 1 "WORD INTX!1125.641 
1874 014346 041141 000656 “WORD _INTX!1141.656 
1875 014352 041154 000674 "WORD _INTX! 1154-674 
1876 014356 041164 000714 "WORD INTX!1164.714 
1877 014 041172 000735 "WORD INTX!1172.735 
1878 014 041176 000756 "WORD INTX!1176.756 
1879 014372 041177 000777 "WORD = INTX!1177.777 
1880 014376 164000 DNOP 
1881 014400 164000 DNOP 
1882 014402 164000 DNOP 
883 014404 164000 NOP 


1 D 
1884 CIRCLE 8 DEG. RADIUS OF 256 
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CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17=SEP=79 08:50 PAGE 29-2 
CZVSDC.P11 11-SEP-79 09:01 CIRCLES USING ABSOLUTE VECTORS (WIDTHS OF 64., 128., AND 256.) 


85 


CPE eth hr RP REEL toto 


;ENABLE ABSOLUTE VECTOR MODE 


MNLSOLOf 


SO —NNWWW 
NWR UWE NNW 


WA N= NMOWUION 
MAMA —WUId NS oR 


NNO? MPS NOANNO 


at 


WI WN © 


ah aod ad aah aah od ah eh ed 
WONAULWN—O 
Sanvo2wew 


1 
: 
: 
1 
1 
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1 
1 
1 
1 
1 
1 
1 
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1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


WOOO0O0000000 


3 


mo 
Satna 
ANIANO 


ay 


2E2 


INTX!1374,734 
INTX!1377,777 


WW 
NN 
N 


ERREE 
88888 


014714 


PS 
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CZVSDC .P11 11-SEP-79 09:01 CIRCLES USING ABSOLUTE VECTORS (WIDTHS OF 64., 128., AND 256.) SEQ 0065 
1941 014716 000640 ; 640 
1942 014720 110000 LONGV sOCTOGON BY LENGTH OF 77 
(1) 014722 040077 INTX+77 
(1) 014724 000000 0 
(1) 014726 040077 INTX+77 
(1) 014730 000077 77 
(1) 014732 040000 INTX 
(1) 014734 000077 77 
(1) 4736 060077 INTX!MINUSX+77 
(1) 014740 000077 77 
(1) 014742 060077 INTX !MINUSX+77 
(1) 014744 000000 0 
(1) 014746 060077 INTX !MINUSX+77 
(1) 014750 020077 MINUSX+77 
(1) 014752 040000 INTX 
(1) 014754 020077 MINUSX+77 
(1) 014756 040077 INTX+77 
(1) 014760 020077 MINUSX+77 
1943 014762 114000 POINT 
1944 014764 000700 700 
1945 014766 000500 500 
1946 014770 110000 LONGV ;OCTOGON BY LENGTH OF 177 
(1) 014772 040177 INTX+177 
(1) 014774 000000 0 
(1) 014776 040177 INTX+177 
(1) 015000 000177 177 
(1) 015002 040000 INTX 
(1) 015004 000177 177 
(1) 060177 INTX !MINUSX+177 
(1) 015010 000177 177 
(1) 015012 060177 INTX!MINUSX+177 
(1) 015014 000000 0 
(1) 015016 060177 INTX!MINUSX+177 
(1) 015020 020177 MINUSX+177 
(1) 015022 040000 
(1) 015024 020177 MINUSX+177 
(1) 015026 040177 INTX+177 
(1) 015030 020177 MINUSX+177 
1947 015032 114000 POINT 
1948 015034 000600 600 
1949 015036 000200 200 
1950 015040 110000 LONGV ;OCTOGON BY LENGTH OF 377 
(1) 015042 040377 INTX+377 
(1) 015044 000000 0 
(1) 015046 040377 INTX+377 
(1) 015050 000377 377 
(1) 015052 040000 INTX 
(1) 015054 000377 377 
(1) 015056 060377 INTX!MINUSX+377 
(1) 015060 000377 77 
(1) 015062 060377 INTX !MINUSX+377 
(1) 015064 000000 
(1) 015066 060377 INTX !MINUSX+377 
(1) 015070 020377 MINUSX+377 
(1) 015072 040000 INTX 
(1) 015074 020377 MINUSX+377 
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PAGE 29-4 
CZVSOC P11 11-SEP-79 09:01 CIRCLES USING ABSOLUTE VECTORS (WIDTHS OF 64., 128., AND 256.) SEG 0066 
(1) 015076 040377 INTX+#377 
(1) 015100 020377 MINUSX +377 
1951 ;DRAW ABSOLUTE VECTOR OCTAGON 
pes 015102 114000 POINT 
1953 015104 000530 530 
1954 015106 10 10 
1955 015110 144000 ABSVCT 
1956 Ua 041250 INTX!1250 ; #1 
1957 015114 000010 10 
1958 015116 041770 INTX!1770 ; #2 
1959 015120 000530 
1960 015122 041770 INTX!1770 3 a3 
1961 015124 001250 1250 
1962 015126 041250 INTX!1250 3 a4 
1963 015130 001770 1770 
1964 015132 0530 INTX!530 3 AS 
1965 015134 001770 1770 
1966 015136 0010 INTX!10 ; #6 
1967 015140 001250 1250 
1968 015142 0010 INTX!10 3 47 
1969 015144 000530 5 
1970 015146 040530 INTX!530 ; #8 
1971 015150 000010 1 
1972 ;DRAW A BASIC SHORT VECTOR OCTAGON 
1973 015152 114000 POINT 
1974 015154 300 300 
1975 015156 001000 1000 
1976 015160 000 BASICS BASIC SHORT VECTOR 
1977 015162 073777 73777 sPATH 6 & 7 
1978 015164 06 63737 :PATH 4 & 5 
1979 015166 053677 53677 sPATH 2 & 3 
1980 015170 043637 3637 PATH 0 & 1 
1981 RAW ANOTHER IN THE RIGHT CENTER 
1982 015172 114000 INT 
1983 015174 001500 1500 
1984 015176 001 1000 
1985 0152 134 BASICS 
1986 015202 073737 73737 3PATH 6 & 5 
1987 0152 043777 43777 :PATH 0 & 7 
1988 015 053637 53637 ZPATH 2 @ 1 
1989 015210 063677 63677 PATH 4 & 3 
015212 173400 DSTOP 
1991 015214 160000 DJMP 
1992 015216 013522 E3 


FRM 
1993 -SBTTL X AND Y OFFSET SUB-PICTURE 


CZVSDC _VS60 VISUAL DISPLAY TEST 


CZVSDC.P11 


015254 


015256 


015354 


015356 
015365 


11-SEP-79 09:01 


105 
023 


021 
105 
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MACY11 30G(1063) 17-SEP-79 08:50 PAGE 30 
X AND Y OFFSET SUB-PICTURE 


OFFTST: 


OFFT1: 
OFFT2: 


SUPPIC: 


SUPCO: 


SUPC1: 


105 SUPSUB: 
023 


POINT 
T12 


wow 
bs be 


T12 
CONSL1!BIT7!BIT6 
POINT! INT4 
400 
400 
BASICV 
INTX!PATHO! 1000 DRAW A SQUARF 
INTX!PATH2! 1000 


INTX!PATH4! 1000 
INTX!PATH6! 1000 
DSTOP 


ENABLE CONSOLE 41 


DJMP 

OFF TST 

-SBTTL SUPER AND SUBSCRIPT SUB-PICTURE 

PCINT 

400 

1000 

LONGV 

pets DRAW REF. LINE 


DJMP ;BYPASS ROTATED REF. LINE 


CHARS3 ENSURE MAX CHAR SIZE 
STATSA! ITALO 
CHAR 


DJSR 
SUPSUB 
ee apes: SET ITALIC 


-SBTTL SUPER AND SUBSCRIPT ASCII STRING 


-BYTE 105,SUPON,105,SUPON,105,SUPON, 105 
;NOW REVERSE AND INCREASE SIZE 
“BYTE  SUPOFF,105,SUPOFF ,105,SUPOFF ,105 


SEQ 0067 


CZVSDC 


CZvSOC. 


VS60 VISUAL DISPLAY TEST 


P11 
015373 


015401 
015407 


015410 


015412 
015414 


015531 


015532 


01 
015650 


11=SEP=79 09:01 


022 
924 
040 


166000 


00000 
044103 
160000 
015532 


117000 
000000 
001000 
154240 
164700 
100004 
047523 


105 
105 


051511 
047131 


051101 


044514 


022 
024 


043040 
020103 


041501 


020104 


D 6é 
MACY11 30G6(1063) 17=SEP=79 08:50 PAGE 30-1 
SUPER AND SUBSCRIPT ASCII STRING 


sNOW IT — + AT THE BIGGEST SIZE 


UBON , 
;REVERSE AND INCREASE SIZE 
-BYTE Z 


SYNPIC: 


SYNTXT: 


SYNSPD: . 


; SHOULD 
1$: 


FRMES: 


SUBON, 105, SUBON, 105 


UBOFF ,105,SUBOFF ,105,SUBOFF ,105 
-BYTE 


DPOP 


-SBTTL SYNC SPEED SUBPICTURE 


STATSA ; VARIABLE WORD TO HANDLE SYNC SPEED 
te hdnegh amet ENABLE CONSOLE #1 


BASICV 
INTX!PATH1! 1000 ;DRAW A DIAMOND 


STRNGi 7 ENABLE CHARACTER TERMINATE 
CHAR 


SYNTXT sDISPLAY SYNC SPEED MESSAGE 
STRNGO ;DISABLE CHARACTER STRING ESCAPE 
SYNPIC ; CONT INUE 
ASCII /THIS FRAME USES / 

/NO/ 
eASCII = /_SYNC / 

177 


NEVER GET HERE UNLESS CHAR TERM. FAILS 
POINT 


200 
700 


CHAR 

ts /CHARACTER TERMINATE FAILED TO CAUSE A POP AND RESTORE/ 
1$ 

-SBTTL DASH LINE SUB-PICTURE 
aaa ees 

1000 

CHARS 1 

CONSL1!BIT7!BIT6 


CHAR! LINEO 
eASCII /SOLID / 


ENABLE CONSOLE #1 


SEQ 0068 


2 E 6 
CZVSDC _VS60 VISUAL DISPLAY TEST MACYT1: ye we 17=SEP=79 08:50 PAGE 30-2 
C2vape. P11 11-SEP-79 09:01 DASH LINE SUB-PICTURE SEQ 0069 


2107 015662 110004 LONGV! LINEO 

2108 015664 040400 40400 

2109 015666 0 

2110 015670 000400 400 

2111 015672 0 

2112 015674 110030 LONGV ! BLKON 

2113 015676 40400 

2114 015700 0 

2115 015702 100020 CHAR! BLK 

2116 015704 0 012 012 BYTE 15, 12,12,12,12,12 
2117 015712 040504 044123 044440 “ASCII /DASH 

2118 015724 11000 LONGV!LINE1 

2119 015726 40400 

2120 015730 0 

2121 015732 000400 400 

2122 015734 0 

2123 015736 110030 LONGV !BLKON 

124 015740 40400 

125 015742 0 

2126 015744 100020 CHAR !BLKOFF 

2127 015746 ~—0 O12 . O12 BYTE (15212,12,12,12,12 
2128 015754 040504 044123 044440 “ASCAI /DASH J 

2129 015766 LONGV! LINE2 

2130 015770 040400 40400 

2131 015772 0 

2132 015774 000400 400 

2133 015776 000000 0 

2134 016000 110030 LONGV ! BLKON 

2135 016002 040400 40400 

136 016004 0 

2137 016006 100020 CHAR !BLKOF F : 
2138 016010 0 012 012 BYTE 15,12,12,12,12,12 
2139 016016 040504 044123 044440 “ASCII /DASH III” / 

2140 016030 11000 CONGV!LINE3 

2141 016032 40400 

2142 016034 0 

2143 016036 000400 400 

2144 016040 0 

2145 016042 110030 LONGV ! BLKON 

2146 016044 40400 

2147 016046 0 

2148 016050 110024 LONGV!BLKOFF !LINEO 

2149 016052 0 

2150 016054 000000 

2151 016056 173400 DSTOP 

2160 016060 161665 DUMPR!BIT8! WHERE 1 ;DJMP RELATIVE TO THE TAG ‘FRMES' 
2162 .SBTTL VECTOR LENGTH SUB-PICTURE 
2164 016062 154024 FRME6: VCTROO!4 NORMAL VECTOR 
2165 016064 114000 POINT 

2166 016066 001777 MAXX 

2167 016070 0 

2168 016072 164700 CONSL1!BIT7!BIT6 ENABLE CONSOLE #1 
2169 016074 113600 LONGV! IN NT7 

2170 016076 040000 IN 


CZVSOC 


CZ2vSOC. 


2171 
2172 
2173 
2174 
75 


rormnonenonrr 
ad ae ced cae cd ca ee ee 


VS60 V 
P11 


016132 


ISUAL DISPLAY TEST 
11-SEP-79 09 


MACY11 30G(1063) 17=SEP=79 08:50 PAGE 30-3 
VECTOR LENGTH SUB-P1CTURE 


MAXY 
POINT 
0 


MAXY 

LONGV 

geo 

PCINT 

8 

vCTROO! 17 ;MAX LENGTH VECTOR 
ABSVCT ;ABSOLUTE VECTOR 


DJMP 
BUFFER 


-SBTTL HORIZONTAL PHOSPHOR SUB=PICTURE 


SEQ 0070 
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CZVSOC.P11 11-SEP-79 09:01 HORIZONTAL PHOSPHOR SUB=PICTUR SEQ 007% 

2190 

2191 016134 114000 ag by POINT 

2192 016136 000000 DELTX7: QO 

2193 016140 0 

2194 016142 123600 DFI10A: pitt 

2200 016144 053777 INTX!PATH2 ! MAXY ; VECTOR STRAIGHT UP 
(1) 016146 002002 PATHO' 2 ;MOVE RIGHT 2 UNITS 
(1) 016150 073777 INTX!PATH6! MAXY ; VECTOR DOWN 
(1) 016152 002002 PATHO!2 MOVE RIGHT 2 UNITS 
(1) 016154 053777 etl ee cet ;VECTOR STRAIGHT UP 
(1) 016156 002002 PATHO!2 ;MOVE RIGHT 2 UNITS 
(1) 016160 073777 INTX: PATH6 ‘MAXY VECTOR DOWN 
(1) 016162 002002 PATHO!2 :MOVE RIGHT 2 UNITS 
(1) 016164 053777 INTX!PATH2!MAXY ;VECTOR STRAIGHT UP 
(1) 016166 002002 PATHO!2 :MOVE RIGHT 2 UNITS 
(1) 016170 073777 INTX!PATH6!MAXY VECTOR DOWN 
(1) 016172 002002 PATHO!2 :MOVE RIGHT 2 UNITS 
(1) 016174 053777 INT! PATH2 !MAXY SVECTOR STRAIGHT UP 
(1) 016176 002002 PATH ;MOVE RIGHT 2 UNITS 
(1) 616200 073777 INTX!PATH6 !MAXY VECTOR DOWN 
(1) 016202 002002 PATHO! 2 sMOVE RIGHT 2 UNITS 
(1) 016204 053777 INTX!PATH2!MAXY [VECTOR STRAIGHT UP 
(1) 016206 PATHO!2 :MOVE ge Ft 2 UNITS 
(1) 016210 073777 INTX!PATH6!MAXY : VECTOR D 
(1) 016212 002002 PATHO!2 MOVE RIGHT. 2 UNITS 
(1) 016214 053777 TNTX! PATH2 !MAXY [VECTOR STRAIGHT UP 
(1) 016216 002002 PATHO!2 MOVE RIGHT 2 UNITS 
(1) 016220 073777 INTX!PATH6!MAXY 353 4 DOWN 
(1) 016222 002002 PATHO!2 MOVE RIGHT 2 UNITS 
(1) 016224 053777 INTX!PATH2 !MAXY ;VECTOR STRAIGHT UP 
(1) 016226 002002 PATHO! 2 :MOVE RIGHT 2 UNITS 
(1) 016230 073777 INTX !PATH6! MAXY [VECTOR DOWN 
(1) 016232 002002 PATHO!2 s;MOVE RIGHT 2 UNITS 
(1) 016234 053777 INTX!PATH2!MAXY ;VECTOR STRAIGHT UP 
(1) 016236 002002 PATHO! 2 ;MOVE RIGHT 2 UNITS 
(1) 016240 073777 INTX!PATH6!MAXY ere DOWN 
(1) 016242 002002 PATHO!2 -MOVE RIGHT 2 UNITS 
(1) 016244 053777 ee ee ; VECTOR STRAIGHT UP 
(1) 016246 002002 ATHO! MOVE RIGHT 2 UNITS 
(1) 016250 073777 INTX!PATH6MAXY VECTOR DOWN 
(1) 016252 002002 PATHO! 2 :MOVE RIGHT 2 UNITS 
(1) 016254 053777 by eal [VECTOR STRAIGHT UP 
(1) 016256 002002 ‘ATHO! MOVE RIGHT 2 UNITS 
(1) 016260 073777 TNTX! PATH6!MAXY VECTOR DOWN 
(1) 016262 002002 PATHO!2 ;MOVE RIGHT 2 UNITS 
(1) 016264 053777 INTX!PATH2!MAXY : VECTOR STRAIGHT UP 
(1) 016266 002002 PATHO!2 [MOVE RIGHT 2 UNITS 
(1) 016270 073777 INTX“ PATH6 :MAXY : VECTOR DOWN 
(1) 016272 002002 PATHO!2 :MOVE RIGHT 2 NS 
(1) 016274 053777 INTX! PATH2 !MAXY :VECTOR STRAIGHT UP 
(1) 016276 002002 PATHO!2 ;MOVE RIGHT 2 UNITS 
(1) 016300 073777 INTX!PATH6!MAXY :VECTOR DOWN 
(1) 016302 002002 PATHO!2 :MOVE RIGHT 2 UNITS 
(1) 016304 053777 a :VECTOR STRAIGHT UP 
(1) 016306 002002 PATHO!2 [MOVE RIGHT 2 UNITS 
(1) 016310 073777 INTX!PATH6!MAXY : VECTOR DOWN 
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CZVSDC.P11 11-SEP-79 09:01 HORIZONTAL PHOSPHOR SUB=PICTUR SEQ 0072 

(1) 016312 002002 PATHO! 2 s;MOVE RIGHT 2 UNITS 
(1) 016314 053777 INTX!PATH2!MAXY we Re STRAIGHT UP 
(1) 016316 002002 PATHO! 2 MOVE RIGHT 2 UNITS 
(1) 016320 073777 til gece “VEC TOR DOWN 
(1) 016322 002002 PATHO!2 [MOVE RIGHT 2 UNITS 
(1) 016324 053777 INT PSTH2!MAXY ; VECTOR STRAIGHT UP 
(1) 016326 002002 ° = PATHO! 2 MOVE RIGHT 2 UNITS 
(1) 016330 073777 1 paaeiaecaseg VECTOR DOWN 
(1) 016332 002002 °°°°-~ ATHO! 2 :MOVE RIGHT 2 UNITS 
(1) 016334 053777 TNTX! PATH2! MAXY ;VECTOR STRAIGHT UP 
(1) 016336 002902 PATHO!2 [MOVE RIGHT 2 UNITS 
<1) 016340 073777 ach eateaese : VECTOR DOWN 
(1) 016342 002002 THO!2 :MOVE RIGHT 2 UNITS 
(1) 016344 053777 TNTX! PATH2 !MAXY [VECTOR STRAIGHT UP 
(1) 016346 002002 PATHO! 2 MOVE RIGHT 2 UNITS 
(1) 016350 073777 INTX | PATH6!MAXY i VECTOR DOWN 
(1) 016352 002002 PATHO!2 MOVE RIGHT 2 UNITS 
(1) 016354 053777 INTX!PATH2 !MAXY ;VECTOR STRAIGHT UP 
(1) 016356 002002 PATHO!2 ;MOVE RIGHT 2 UNITS 
(1) 016360 073777 INTX ! PATH6! MAXY VECTOR DOWN 
(1) 016362 002002 PATHO!2 :MOVE RIGHT 2 UNITS 
(1) 016364 053777 INT! PATH: MAXY [VECTOR STRAIGHT UP 
(1) 016366 002002 ATHO! 2 MOVE RIGHT 2 UNITS 
(1) 016370 073777 INT! PATH max VECTOR DOWN 
(1) 016372 002002 PATHO!2 s;MOVE RIGHT 2 UNITS 
(1) 016374 053777 INTX!PATH2!MAXY ;VECTOR STRAIGHT UP 
(1) 016376 002002 PATHO! 2 ;MOVE RIGHT 2 UNITS 
<1) 016400 073777 INTX!PATH6 !MAXY : VECTOR DOWN 
(1) 016402 002002 PATHO!2 MOVE RIGHT 2 UNITS 

2201 016404 173400 DSTOP 

2202 016406 160000 DJMP 

$su7 016410 016142 DF 110A 

4 -SBTTL MAIN VERTICAL PHOSPHOR SUB-PICTURE 

2207 016412 114000 FRME11: POINT 

2208 016414 000000 

2209 016416 000000 DELTY7: O 

2210 016420 170002 DMENUO 

2211 016422 123600 DFI11C: BASICV! INT7 

2217 016424 043777 INTX ! PATHO ! MAXX ;VECTOR RIGHT FULL WIDTH 
(1) 016426 012002 PATH2!2 :MOVE UP 2 UNITS 
(1) 016430 063777 INTX: PATHS ‘MAXX ;VECTOR LEFT FULL SCREEN 
(1) 016432 012002 PATH :MOVE UP 2 UNITS 
(1) 016434 043777 INT PATHO ! MAXX :VECTOR RIGHT FULL WIDTH 
(1). 016436 012002 PATH2!2 MOVE UP 2 UNITS 
(1) 016440 063777 INTX ! PATH4 ! MAXX ;VECTOR LEFT FULL SCREEN 
(1) 016442 012002 PATH2!2 ;MOVE UP 2 UNITS 
(1) 016444 043777 INTX"PATHO!MAXX ; VECTOR RIGHT FULL WIDTH 
(1) 016446 012002 ATH2!2 :MOVE UP 2 UNIT 
(1) 016450 063777 TNTXPATH4!MAXX : VECTOR LEFT FULL SCREEN 
(1) 016452 012002 PATH2!2 ;MOVE UP 2 UNITS 
(1) 016454 043777 ott pealiaaan :VECTOR RIGHT FULL WIDTH 
(1) 016456 012002 ATH2!2 s:MOVE UP 2 UNITS 
(1) 016460 063777 TNTX PATHS ! MAXX ; VECTOR LEFT rhe SCREEN 
(1) 016462 012002 PATH2!2 :MOVE UP 2-UNITS 


CZVSDC VS60 VISUAL DISPLAY TEST 
’ 79 09:01 
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I 6 
MACY11 30G(1063) 17=SEP=79 08:50 PAGE 31-2 


MAIN VERTICAL PHOSPHOR SUB-PICTURE 


pate !PATHO ! MAXX 

INTX PATHG {MAXX 
PATH2!2 

a apa 

INTX: PATHS : MAXX 

PATH2!2 

INTX !PATHO ! MAXX 

PATH2!2 

INTX! PATHS ! MAXX 


PATH2!2 
ae !MAXX 


PATH 
INTX! PATHS ! MAXX 
PATH2!2 
ale !PATHO ! MAXX 
PATH2!2 
tle ! PATHS ! MAXX 
ATH2!2 


INTXSPATHO: !MAXX 
ne lal paa !MAXX 


INTX!PATHO! MAXX 
PATH2!2 
INTX! PATHS ! MAXX 
PATH2!2 
INT !PATHO ! MAXX 
PATH2!2 
tle !PATH4 !MAXX 
PATH2!2 
Feely !PATHO ! MAXX 
ATH2!2 


INTX !PATH4 !MAXX 
PATH2!2 

INTX!PATHO ! MAXX 

PATH2!2 

INTX ! PATH4 ! MAXX 

“PATH2!2 

otis! aaaiaaes 


ATH 
INTX!PATH4 ! MAXX 
PATH2!2 

INTX! PATHO !MAXX 


PATH 
platy | PATHS !MAXX 


INTX3PATHO !MAXX 

JONTX PATHS MAXX 
PATH2!2 

INTXSPATHO!MAXX 
PATH2!2 

acl eae !MAXX 


VECTOR RIGHT A WIDTH 


;MOVE UP 2 

VECTOR LEFT A. SCREEN 
SMOVE UP 2 UNITS 

SmOvE UP > A WIDTH 


E UN 
[VECTOR LEFT FULL SCREEN 
:MOVE UP 2 UNITS 
:VECTOR RIGHT FULL WIDTH 
SMOVE UP 2 UNITS 
; VECTOR LEFT FULL SCREEN 
;MOVE UP 2 UNITS 
;VECTOR RIGHT FULL WIDTH 


:MOVE UP 2 UNITS 
: VECTOR LEFT FULL SCREEN 
E UP 2 UNITS 


MOV UN 

; VECTOR RIGHT FULL WIDTH 

:MOVE UP 2 UNITS 

; VECTOR LEFT FULL SCREEN 

;MOVE UP 2 UNITS 

VECTOR RIGHT FULL WIDTH 
MOVE UP 2 UNITS 

“VECTOR LEFT FULL SCREEN 

[MOVE UP 2 UNITS 

:VECTOR RIGHT FULL WIDTH 

;MOVE UP 2 UNITS 

: VECTOR LEFT FULL SCREEN 

;MOVE UP 2 UNITS 

: VECTOR RIGHT FULL WIDTH 

;MOVE UP 2 UNIT 

;VECTOR LEFT FULL SCREEN 

:MOVE UP 2 UNITS 

: VECTOR RIGHT ae WIDTH 


;MOVE UP 2 UNI 

: VECTOR LEFT FULL SCREEN 
:MOVE UP 2 UNITS 

: VECTOR RIGHT FULL WIDTH 
[MOVE UP 2 UNITS 

:VECTOR LEFT FULL SCREEN 
;MOVE UP 2 UNITS 

VECTOR RIGHT 4 ae WIDTH 


[MOVE UP 2 UNITS 
: VECTOR LEFT FULL SCREEN 
;MOVE UP 2 UNITS 
; VECTOR RIGHT FULL WIDTH 


:MOVE UP 2 UNITS 
‘Move ees U + SCREEN 
[VECTOR RIGHT FULL WIDTH 
SMOVE UP 2 UNITS 


: VECTOR LEFT FULL SCREEN 
E UP 2 T 


V UN 
[VECTOR RIGHT FULL WIDTH 
>MOVE UP 2 UNITS 
; VECTOR LEFT FULL SCREEN 
[MOVE UP 2 UNITS 


CZVSDC _VS60 VISUAL DISPLAY TEST 
11-SEP-79 09:01 


CZVSDC.P11 
(1) 016644 
(1) 016646 
(1) 016650 
(1) 016652 
(1) 016654 
(1) 016656 
(1) 016660 
(1) 016662 

2218 016664 
2219 016666 
2220 016670 
2221 
2202 
2223 } 
2224 016672 
2225 016674 
2226 016676 
2227 016700 
2233 016702 
C1) 016704 
(1) 016706 
(1) 016710 
(1) 016712 
(1) 016714 
(1) 016716 
(1) 016720 
(1) 016722 
(1) 016724 
(1) 016726 
(1) 016730 
(1) 016732 
(1) 016734 
(1) 016736 
(1) 016740 
(1) 016742 
(1) 016744 
(1) 016746 
(1) 016750 
(1) 016752 
(1) 016754 
(1) 016756 
(1) 016760 
(1) 016762 
(1) 016764 
(1) 016766 
(1) 016770 
(1) 016772 
(1) 016774 
(1) 016776 
(1) 017000 
(1) 017002 
(1) 917004 
(1) 017006 
(1) 017010 
(1) 017012 
(1) 017014 


MACY11 30G6(1063) 
MAIN VERTICAL PHOSPHOR SUB=PICTURE 


FRM11S: 


ey ae MAXX 
PATH2!2 

INTX :PATH4 !MAXX 

PATH 

INTASPATHO: !MAXX 

aed !PATH4 ! MAXX 

TH2!2 

DSTOP 

DJMP 

DFI11C 


6 
17-SEP-79" 08:50 


PAGE 31-3 


;VECTOR RIGHT FULL WIDTH 
:MOVE UP 2 UNITS 
;VECTOR LEFT FULL SCREEN 


*MOV E UP 2 UNITS 
‘VECTOR RIGHT FULL WIDTH 
sMOVE UP TS 
; VECTOR LEFT FULL SCREEN 
sMOVE UP 2 UNITS 


~SBTTL MENU VERTICAL PHOSPHOR SUB-PICTURE 


POINT 
0 


DELT11: 0 


FRM11D: 


BASICV! INT7 

INTX! PATHO ! MAXMUX 
PATH2!2 

INTX! PATH4 ! MAXMUX 
PATH2!2 

in :PATHO !MAXMUX 


PATH 
INTX ‘PATH !MAXMUX 
PATH2!2 
tle !PATHO !MAXMUX 
PATH2!2 


ag he !PATH4 ! MAXMUX 
PATH2!2 

INTX!PATHO ! MAXMUX 

PATH2!2 

opts amas, 
PATH2!2 


ae !MAXMUX 
 ogtely !PATH4 ! MAXMUX 


PAT 
INTX ! PATHO ! MAXMUX 
PATH2!2 
at hsty ! PATHS !MAXMUX 
INTX ! PATHO ! MAXMUX 
PATH2!2 
INTXSF !PATH4 !MAXMUX 
I INTX3PATHO! !MAXMUX 
ae !MAXMUX 
INTX !PATHO ! MAXMUX 
PATH2!2 
INTX ! PATH4 ! MAXMUX 
PATH2!2 
INTX!PATHO:MANMLX 
ATH2!2 


;VECTOR RIGHT FULL SCREEN IN MENU 
sMOVE UP 2 UNIT 
;VECTOR LEFT FULL MENU SCREEN 


MOVE UP 2 UNITS 
; VECTOR x” + a SCREEN IN MENU 


;MOVE UP 2 UNITS 

: VECTOR LEFT FULL MENU SCREEN 
;MOVE UP 2 UNITS 

: VECTOR RIGHT FULL SCREEN IN MENU 
SMOVE UP 2 UNITS 


:VECTOR LEFT FULL MENU SCREEN 
MOVE UP 2 UNITS 
: VECTOR RIGHT FULL SCREEN IN MENU 


MOVE UP 2 UNITS 


: VECTOR LEFT FULL MENU SCREEN 

s;MOVE UP 2 UNIT 

VECTOR RIGHT FULL SCREEN IN MENU 
2 WITS 


MOVE UP 
ees FULL MENU SCREEN 


:MOVE 2 UNITS 

:VECTOR RIGHT FULL SCREEN IN MENU 
;MOVE UP 2 UNITS 

: VECTOR LEFT FULL MENU SCREEN 
:MOVE UP 2 UNITS 

VECTOR RIGHT FULL SCREEN IN MENU 
:MOVE UP 2 UNITS 

: VECTOR LEFT FULL MENU SCREEN 
;MOVE UP 2 UNITS 

VECTOR RIGHT FULL SCREEN IN MENU 
MOVE UP T 

VECTOR LEFT FULL MENU SCREEN 
SMOVE UP 2 UNITS 

VECTOR RIGHT FULL SCREEN IN MENU 
;MOVE UP 2 UNIT 

: VECTOR LEFT FULL MENU SCREEN 
SMOVE UP 2 UNITS 

: VECTOR RIGHT FULL SCREEN IN MENU 
;MOVE UP 2 UNITS 


SEQ 0074 





CZVSDC _VS60 VISUAL DISPLAY TEST 
CZVSDC.P11 11-SEP-79 09:01 
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017146 
017150 


017172 


MACY11 30G(1063) 
MENU VERTICAL PHOSPHOR SUB-PICTUR 


ae !PATH4 ! MAXMUX 

I INTXSPATHO! !MAXMUX 

ae !MAXMUX 

ceil A eitamaate 
PATH2!2 

INTX ! PATH4 ! MAXMUX 

PATH2! 

ally aaa !MAXMUX 

vt Fie !MAXMUX 

ook! sae *MAXMUX 

ot ly ila !MAXMUX 

INTX :PATHO !MAXMUX 

PATH 

INT! PATHS! MAXMUX 

PATH2!2 

INTX ! PATHO ! MAXMUX 

PATH2!2 

INTX! PATHS !MAXMUX 

PATH2! 

INTX ! PATHO ! MAXMUX 

PATH2!2 

ettd ! PATHS ! MAXMUX 

INTX! PATHO! MAXMUX 

PATH2!2 

INTX ! PATH4 ! MAXMUX 

PATH2!2 

wet !PATHO ! MAXMUX 
PATH2!2 

INTX ! PATH4 !MAXMUX 
PATH2!2 

INTASPATHO: !MAXMUX 

eel aes !MAXMUX 

DSTOP 

DJMP 

FRM11D 


vada 


0 
CONSL1!BIT7!BIT6 
LONGV 

ieee 

INTX 

MAXY 
INTX!MINUSX ! MAXX 


6 
17=SEP-79° 08: Fe PAGE 31-4 


; VECTOR LEFT FULL MENU SCREEN 

;MOVE UP TS 

; VECTOR RIGHT FULL SCREEN IN MENU 

;MOVE UP 2 UNITS 

VECTOR LEFT FULL MENU SCREEN 

;MOVE UP 2 UNIT 

:VECTOR RIGHT FULL SCREEN IN MENU 

;MOVE UP 2 UNITS 

;VECTOR LEFT FULL MENU SCREEN 

:MOVE UP 2 UNITS 

: VECTOR RIGHT FULL SCREEN IN MENU 

;MOVE UP 2 UNITS 

eee LEFT FULL MENU SCREEN 
MOVE UP 2 UNITS 

: VECTOR RIGHT FULL SCREEN IN MENU 

;MOVE UP 2 UNIT 

: VECTOR LEFT FULL MENU SCREEN 

;MOVE UP 2 UNITS 

See on A. SCREEN IN MENU 


:MOVE UP 2 UNITS 
: VECTOR LEFT FULL MENU SCREEN 
:MOVE UP 2 UNITS 


:VECTOR RIGHT FULL SCREEN IN MENU 
MOVE UP 2 UNITS 
;VECTOR LEFT FULL MENU SCREEN 

VE UP 2 TS 


sMOVE UN 

: VECTOR RIGHT FULL SCREEN IN MENU 
;MOVE UP 2 UNITS 

;VECTOR LEFT FULL MENU SCREEN 
:MOVE UP 2 UNITS 

: VECTOR RIGHT FULL SCREEN IN MENU 
;MOVE UP 2 UNITS 

: VECTOR LEFT FULL MENU SCREEN 
:MOVE UP 2 UNITS 

VECTOR RIGHT FULL SCREEN IN MENU 
:MOVE UP 2 UNITS 

VECTOR LEFT FULL MENU SCREEN 
[MOVE UP 2 UNITS 

VECTOR RIGHT 4 ae SCREEN IN MENU 


VE UP 2 UN 
“VECTOR LEFT FULL MENU SCREEN 
:MOVE UP 2 UNITS 


ENABLE CONSOLE #1 


SEQ 0075 











6 
CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G6(1063) 17=SEP=79- 08:50 PAGE 31-5 
CZVSDC.P11 11-SEP-79 09:01 MENU VERTICAL PHOSPHOR SUB=PICTURE SEQ 0076 


017174 
INTX 
MINUSX ! MAXY 
DSTOP 
160000 DJMP 
017150 FRM10 


170003 : DMENU1 ENABLE MENU 
117600 POINT! INT7 
000000 0 


110000 LONGV 
040177 INTX ! MAXMUX 
000000 0 


040000 INTX 
001777 MAXY 
060177 INTX !MINUSX !MAXMUX 
000000 0 
040000 INTX 
021777 MINUSX ! MAXY 
173400 DSTOP 
160000 DJMP 
017246 017210 FRM11M 





VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17-SEP-79 08:50 PAGE 32 
P11 11-SEP-79 09:01 MENU VERTICAL PHOSPHOR SUB=-P]CTURE SEQ 0077 


-SBTTL SHORT VECTOR AND RELATIVE POINT SUB-PICTURE 


017250 FRME 14: ae on ENABLE CONSOLE #1 


FRMIGA: 0 
FRM14B: 0 


SHORTV 

INTX+16200 

INTX+16200+71 

INTX*71 

alte ee mid + yaa 

INTX !MINUSX+16200 
INTX!MINUSX+162004*MINSUY +71 
INTX#MINSUY+71 
INTX+16200+MINSUY +71 

20504 


RELATP 

INTX+17000 

INTX+17000+74 

INTX+74 

INTX!MINUSX+17000+74 

INTX !MINUSX+17000 

INTX !MINUSX+17000+MINSUY +74 
INTX*#MINSUY+74 
INTX+17000+MINSUY +74 

20504 


SHORTV 

INTX+17600 

INTX+17600+77 

INTX+77 

INTX !MINUSX+17600+77 

INTX !MINUSX+17600 

INTX !MINUSX+17600+MINSUY+77 
INTX+MINSUY +77 
INTX+17600+MINSUY +77 

20504 


DSTOP 
160000 DJMP 
017250 FRME 14 


4 St 
wee Ne ee ee te ee ee 
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CZVSDC _VS60 VISUAL DISPLAY TEST 


CZVSDC.P11 


2302 
2303 


017420 
017422 


017462 


11-SEP-79 09:01 


0000 
017362 


N 
MACY11 30G(1063) 17-SEP-79 
GRAPHPLOT INCREMENT SUB=PICTIi 


6 
08:50 PAGE 33 
URE 


.SBTTL GRAPHPLOT INCREMENT SUB=PICTURE 


GRAPH: 


GRPINC: 


POINT !LINEO 
400 


200 
CONSL1!BIT7!BIT6 
LONGV 

INTX+1200 

0 

POINT 

440 

200 

STATSB! INCR+4 
GRAPHY 


sENABLE CONSOLE #1 


;DRAW BASE REF. VECTOR FOR GRAPH Y 


;LOAD GRAPHPLOT INCR. REGISTER 


iDJSR TO ‘'SINE DATA" 
:DJSR TO SINE DATE 


:DRAW BASE REF. VECTOR FOR GRAPH X 


zDJSR TO *'SINE DATA’ 
;DJSR TO "SINE DATA'’ 


SEQ 0078 


C S60 VISUAL DISPLAY TEST MACY11 30G(1063) 17=SEP=79 08:50 PAGE 34 
Pll: 11=SEP=79 09:01 GRAPHPLOT INCREMENT SUB-PICTURE 


DATA STRING FOR A SINE WAVE 

0200.0205,0212. Oct. 02240231 ,0236,0243,0247,0253 

0277,0276, -0267,0 0 

0246,0241,0235.0230,0223,0216,0211,0203,0176,01 4 
0163 137,0133,0127,0123,0117,011 


017714 ;DISPLAY POP AND RESTORE 
SHORT TERM DRIFT SUB-PICTURE 





C 
CZVSDC _VS60 VISUAL DISPLAY TEST MACY11_ 30G(1063) 17-SEP-79 08:50 PAGE 35 
CZVSDC.P11 11-SEP-79 09:01 SHORT TERM DRIFT SUB-PICTURE 


2358 017716 STDPIC: CONSL1!BIT7!BIT6 ;ENABLE CONSOLE #1 
0177 POINT! INTS 
STDRA: 
STDRB: 0O 
DSTOP 
DUMP 
STDPIC 
PICVTL: POINT 
PICVTA: O 
PICVTB: 0 
LONGV 
PICVTC: we 
PICVTE: DSTOP 
160000 DJMP 
017754 PICVTL 
-SBTTL SCREEN SCISSORING SUB-PiCTURE 
017756 164700 PICSCS: CONSL1!BIT7!BIT6 ;ENABLE CONSOLE 41 
VCTROO!4 


POINT 
0 


0 
LONGV 
INTX 


MAXY 
" wegeess 


INTX 
MINUSX !MAXY 
INTX !MINUSX ! MAXX 


0 
POINT 
40 


LONGV 
erenenne 
maa 
INTX!MINUSX! 100 
oe 
INTX!MINUSX! 100 
INTX!100 

20 
INTX!MINUSX!10C 
INTX!100 

200 

POINT 

0 


Ci te i i ee i i ee 
— 3 s SS 3 Ss ss SS Ss 
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\ 
* 
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CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G6(1063) 17=SEP=79° 08:50 PAGE 35-1 


CZVSDC.P11 11-SEP-79 09:01 SCREEN SCISSORING SUB-PICTURE SEQ 0081 
2404 020066 001737 MAXY=40 
2405 020070 11 
2411 020072 040200 INTX! 200 
(1) 020074 000100 
(1) 76 040200 TX! 
(1) 020100 020100 MINUSX! 100 
(1) 020102 040200 INTX! 200 
(1) 020104 100 
(1) 020106 040200 INTX: 200 
(1) 020110 020100 MINUSX! 100 
(1) 020112 040200 INTX! 200 
(1) 020114 000100 100 
(1) 020116 040200 INTX! 200 
(1) 020120 020100 MINUSX! 100 
(1) 020122 040200 INTX! 200 
(1) 020124 000100 100 
(1) 020126 040200 INTX! 200 
(1) 020130 020100 MINUSX! 100 
2412 020132 114000 POINT 
2413 020134 001737 MAXX=40 
2414 020136 001777 MAXY 
2415 020140 110000 LONGV 
2421 020142 040100 INTX! 100 
(1) 020144 020200 MINUSX ! 200 
(1) 020146 060100 INTX !MINUSX ! 100 
(1) 020150 020200 MINUSX ! 200 
(1) 020152 040100 INTX! 100 
(1) 020154 020200 MINUSX ! 200 
(1) 020156 060100 INTX !MINUSX ! 100 
(1) 020160 020200 MINUSX ! 200 
(1) 020162 040100 INTX! 100 
(1) 0164 020200 MINUSX ! 200 
(1) 020166 060100 INTX !MINUSX ! 100 
(1) 020 020200 MINUSX ! 20 
(1) 020172 040100 INTX! 100 
(1) 020174 020200 MINUSX ! 200 
(1) 020176 060100 INTX!MINUSX ! 100 
(1) 020200 020200 MINUSX ! 200 


CZVSDC _VS60 VISUAL nn id 


CZVSDC.P11 


11-SEP-79 


0000 
020320 


MACY11 30G6(1063) 
SCREEN SCISSORING SUB-PICTURE 


erste STARTING POINT OFF OF THE VIEWING SCREENE 


MINUSX ! 200 
:NOW DRAW - DIAMOND THAT INTERSECTS EACH OF THE FOUR EDGES 


PICSCA: 


ONGV 
INT: MINUSX !200 
MINUSX! 100 

INTX:MINUSX ! 200 
INTX!MINUSX ! 200 
MINUSX! 100 

0 A aaa 
INTX !MINUSX ! 200 
MINUSX! 100 

nee 
INTX !MINUSX ! 200 


MINUSX! 100 
7 aatarasasti 


* pea 
LONGV 
0 


LONGYV 

(ie: teee 

en 

INTX: MINUSX ‘1200 
X!1200 


INTX! 1300 
MINUSX! 1200 


-SBTTL VECTOR SCALE SUB-PICTURE 


VCTROO!4 
POINT! INT7 
MAXX/2 
MAXY/2 
VCTROO!4 
LONGV 
MINUSX! 150 
MINUSY! 150 
palais 
INTX 


jc. * 
abe "MINUSX ! 320 


INTX 
MINUSX ! 320 


E 
17=SEP=79 08:50 PAGE 36 


SEQ 0082 


CZVSDC VS60 VISUAL DISPLAY TEST 


CZVSDC.P11 


020516 


11-SEP-79 09:01 


154024 
3400 


0000 
017756 


a 
MACY11 30G6(1063) 17=SEP=79 08:50 PAGE 36-1 


VECTOR SCALE SUB=-PICTURE 


VSTRT: 


VCTROO!4 

DSTOP 

DJMP 

PICSCS 

-SBTTL VECTOR STARTING SUB=-PICTURE 
POINT 

1003 


—~ 


LONGV : VECTOR 
sVECTOR 2 
SVECTOR 3 


LONGV VECTOR 4 
 letiern iene 


POINT 
1002 
758. 


LONGV VECTOR 5 
 ibtaaieee caution: 


VECTOR 6 


LONGV VECTOR 7 
INTX 

MINUSX! 128. 

POINT 

1003 

640. 


LONGV VECTOR 8 
pets ROMA SER, 


SEQ 0083 


CZVSDC _VS60 VISUAL od gH bd 


CZVSDC.P11 


020520 
22 


11-SEP-79 


0000 
040200 


MACY11 30G6(1063) 
MAJOR AXIS OFFSET SUB-PICTURE 


-SBITL oa aa AXIS OFFSET SUB=-PICTURE 
2 + + 


MINUSY ! 200 


LONGV 
INTX! 200 
MINUSX!177 
= =f 
POINT 


1000 
400 


LONGV 
INTX!MINUSX!177 
MINUSY ! 200 


LONGV 
INTX !MENUSX ! 200 
MINUSX! 177 


“xX +7 

POINT 

1000 

400 

LONGV 
INTX!MINUSX! 177 
200 

POINT 

1000 

400 


LONGY 
INTX!MINUSX ! 200 
177 


G 7 
17=SEP=79 08:50 PAGE 36-2 


MINOR 


MINOR 


MINOR 


MINOR 


MiNOR 


MINOR 


MINOR 


SEQ 0084 


CZVSDC _VS60 VISUAL DISPLAY TEST 


CZVSDC P11 


Ca ti ee i i ee 
— SS os SS os SS SS ss os YH I 


2 


WRIwe wwe ewe wuvvVevuvvwwvwwe 


020660 
020662 
020664 


020741 


020742 


020777 


11-SEP-79 09:01 


173400 
160000 
020360 


MACY11 30G6(1063) 
MAJOR AXIS OFFSET SUB=PiCTURE 


CHAQU: 


DSTOP 
DJMP 
VSTRT 


17=SeP=79" 08:50 PAGE 36-3 


-SBTTL CHARACTER SCALE SUB-PICTURE 
7"A"' CHARACTER 


CONSL1!BIT7!BIT6 
POINT 


700 
1400 


LONGV 
eee 


;DRAW REF. 


CHAR SIZE 
; CHARACTER 


;CHAR SIZE 
; CHAR MODE 


CHAR SIZE 


CHAR SIZE 


;DRAW REF, 


:CHAR SIZE 
; CHARACTER 


:CHAR SIZE 
:CHAR MODE 


ENABLE CONSOLE 41 


LINE 


3 ( X2) 
MODE 
2 (1 142 x) 


1 ¢ 1X) 


( 1/2) 


LINE 


3 ( X2) 
MODE 


2¢(1 172 x) 


SEQ 0085 


CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G6(1063) 17=SEP=79 08:50 PAGE 36-4 


C2vebe. P11 11-SEP-79 09:01 CHARACTER SCALE SUB-PICTURE SEQ 0086 
(1) 021000 154240 CHARS1 CHAR SIZE 1 ( 1X) 
(1) 021002 100000 CHAR 
(1) 021004 102 BYTE 102 
(1) 021005 000 wre @ 

(1) 021006 154200 CHARSO sCHAR SIZE (¢ 1/2) 
(1) 021010 100000 CHAR 
(1) 021012 102 -BYTE 102 
(1) 021013 000 -BYTE 0 
2615 
2616 "'F’* CHARACTER 
2617 
2618 021014 114000 POINT 
2619 021016 000 700 
2620 021020 001000 1000 
2621 021022 7110000 LONGV ;DRAW REF. LINE 
2622 021024 040400 INTX!400 
2623 021026 
2624 021030 114000 POINT 
2625 021032 000700 700 
2626 021034 001000 1000 
2627 021036 154340 CHARS3 sCHAR SIZE 3 ( X2) 
(1) 021040 100000 CHAR ; CHARACTER MODE 
(1) 021042 106 BYTE 106 
(1) 021043 000 -BYTE 0 
(1) 021044 154300 CHARS2 CHAR SIZE 2 ( 1 172 X) 
(1) 021046 100000 CHAR ; CHAR MODE 
(1) 021050 106 BYTE 106 
(1) 021051 000 -BYTE 0 
(1) 021052 154240 CHARS1 CHAR SIZE 1 ( 1X) 
(1) 021054 100000 CHAR 
(1) 021056 106 BYTE 106 
(1) 021057 000 -BYTE 0 
(1) 021 154200 CHARSO CHAR SIZE ( 1/2) 
(1) 021062 100000 CHAR 
(1) 021 106 BYTE 106 
(1) 021065 000 BYTE 0 
2628 
2629 3" '0"* CHARACTER 
2630 
2631 021066 117000 POINT! INT4 - 
2632 021070 000700 700 ; 
th 021072 000600 600 
2635 021074 154340 CHARS3 > sCHAR SIZE 3 ( X2) 
(1) 021076 100000 CHAR CHARACTER MODE 
(1) 021100 117 BYTE 117 
(1) 021101 000 -BYTE 0 
(1) 021102 154300 CHARS2 CHAR SIZE 2 ( 1 172 X) 
(1) 021104 100000 CHAR CHAR MODE 
(1) 021106 117 BYTE 117 
(1) 021107 000 -BYTE 0 
(1) 021110 154240 CHARS1 CHAR SIZE 1 ( 1X) 
(1) 021112 100000 CHAR 
(1) 021114 117 BYTE 117 
(i) 021115 000 -BYTE 0 
(1) 021116 154200 CHARSO CHAR SIZE ( 1/2) 


J 
CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G6(1063) 17=SEP=79 08:50 PAGE 36-5 
CZVSDC.P11 11-SEP-79 09:01 CHARACTER SCALE SUB~PICTURE SEQ 0087 


100000 CHAR 

117 BYTE 117 

000 -BYTE 0 
154024 VCTROO!4 ;LOAD VECTOR SCALE TO NORMAL SIZE 
114000 POAT 


000600 600 
154030 VCTROO! 10 ;LOAD 2x VECTOR SIZE 
162000 © DJSR ;DJSR TO DISPLAY SCALED POINTS AROUND THE ‘0D’ 


ORELPT 
VCTROO!6 ;LOAD VECTOR SCALE TO 1 1/2 SIZE 
DJSR ;DJSR.TO DISPLAY SCALED POINTS 


ORELPT 
VCTROO!4 ;LOAD VECTOR SCALE TO 1 SIZE 
DJSR :DJSR TO DISPLAY POINTS 


;LOAD VECTOR SCALE TO 1/2 SIZE ° 
;DJSR TO DISPLAY RELATIVE POINTTS 


;RETURN TO NORMAL SIZE 


3" 'T’* CHARACTER 
POINT 
700 
400 
LONGV 
ieee 


CHAR SIZE 3 ( X2) 
CHARACTER MODE 


sCHAR SIZE 2 ( 1 172 X) 
HAR MODE 


CHAR SIZE 1 (¢ 1X) 


CHAR SIZE ( 1/2) 


i ee i ee i 
ee Ne Ne Ne Ne ee ee ee ee les ee ee a 


021255 








CZVSDC _VS60 VISUAL on nO hl 


CZVSOC.P11 


Ce te ae, i i i ee i ee ee, ee ee, 
— os et SS es SS SS os ss SS SS 
ee Ne ee ee ee ee ele eee 


021256 
02 


021354 


11-SEP-79 


114000 


09: 


MACY11 30G6(1063) 


oF 
17-SEP-79 08:50 


CHARACTER SCALE SUB=-PICTURE 


3'’" CHARACTER 
POINT 


700 
200 


LONGV 
INTX!400 


ORELPT: RELATP 


INTX! 1600 


INTX!13 


INTX 
3400 
DPOP 


-SBTTL ROTATE CHARACTERS SUBPICTURE 


INTX -MINUSX ‘1600 
x!113 


PAGE 36-6 


CHAR SIZE 3 ( X2) 
; CHARACTER MODE 


sCHAR SIZE 2 ( 1 1/2 X) 


CHAR MODE 


CHAR SIZE 1 ( 1X) 


CHAR SIZE ( 1/2) 


sENABLE RELATIVE POINT MODE 


SEQ 0088 


CZVSDC _VS60 VISUAL DISPLAY TEST 


CZVSDC.P11 
021356 
021360 


021422 


021424 


021643 
021720 


021722 


6 
022220 


11-SEP-79 09:01 


170003 
114000 
000000 


-~ £2, Poy aS, oe GS 


020105 
042510 

012 
020105 


042510 
012 


AONEAS 


on SS ee OO SH Sh os 
Ao WON 


MNESAON 


052521 
050440 


052521 


050440 


al al aad a al i eh ll 
RUNS ROS 
NONUNONW 


ed ed aed cad ed ed nd 
RMS HS 
NONUNONVW 


L 
MACY11 30G(1063) 17-SEP-79 
ROTATE CHARACTERS SUBPICTURE 


ROTCHR: DMENU1 
. POINT 


BASICV 
INTX!PATHO! 177 
INTX!PATH2!MAXY 
INTX!PATH4!177 
INTX!PATH6!MAXY 
POINT 


. ‘ ’ . 


DJMP 
BUFFER 


7 
08:50 PAGE 37 


ENABLE MENU 


DRAW REF .. BOX 


7 ENABLE CHAR ROTATION 
;DJSR 


Lie < Pog cia Sasa Call. | 


;DISABLE ROTATION 
sRETURN TO MAIN SCREEN 


; JUMP BACK TO MAIN TEXT 


a ee ae a ee a 


;TWO COPIES OF THE ‘QUICK BROWN FOX’* MESSAGE 


CHARQA: STATSA! ITALO 
CHAR 


-ASCII 


NON ITALIC 
/THE QUICK BROWN FOX JUMPS OVER THE LAZY DOGS / 


eASCII /THE QUICK BROWN FOX JUMPS OVER THE LAZY DOGS / 


BYTE 15,1 
STATSA! ITAL1 
-ASCII 


~ 


/THE QUICK BROWN FOX JUMPS OVER THE LAZY DOGS / 


ASCII /THE QUICK BROWN FOX JUMPS OVER THE LAZY DOGS / 


-BYTE 15,12 
;LOWER CASE ASCII MESSAGES 
CHARQD: STATSA! ITALO 

CHAR 


“BYTE  164,150,145,40, 161,165,151, 143,153.40, 142,162,157, 167,156 
"BYTE 40,146,157+170.40, 152-165, 155+ 160,163.40, 157, 166,145,162 

"BYTE 40.164.150,145.40,154.141.172.171.40 

"BYTE 144,157,147,163,40 

"BYTE 164.150.145.40,161,165,151, 143,153.40, 142,162, 157,167,156 
"BYTE 40,146,157,170.40, 152,165,155, 160,163.40, 157, 166,145, 162 

"BYTE 40.164.150,145.40,154.141.172.171.40 

"BYTE 144,157,147,163,40 

-BYTE 15,12 

STATSA!ITAL1 :SET ITALICS 

“BYTE | 164,150,145,40, 161,165,151, 143,153,40,142, 162,157, 167,156 
"BYTE  40,146,157-170,40, 152,165, 155-160,163.40,157, 166,145, 162 

"BYTE 40.164.150,.145.40,154.141.172.171.40 

"BYTE 144,157,147,163,40 

"BYTE 164.150.145.40,161,165,151,143,153,40,142, 162,157, 167,156 
"BYTE  40,146,157-170.40, 152,165, 155-160, 163.40, 157, 166,145, 162 

"BYTE 40.164.150.145.40.154.141.172.171.40 

"BYTE 144,157,147,163,40 

"BYTE 15,12 

STATSA! ITALO 


SEQ 0089 


CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17-SEP-79" 08:50 PAGE 37-1 
CZ2VSDC.P11 11=SEP=79 09:01 ROTATE CHARACTERS SUBPICTURE 


022222 166000 


LIGHT=PEN SUBPICTURE 


TION THE OCTAGON 
el eigirsie BIT4!BIT3!BIT2 ENABLE CONSOLE 41 


I 
| 
'BIT6!BITS!BIT4!BIT3!BIT2 


-SBTTL POS 
022224 : CONSL1!BIT7! 

pre at AS 17! 

acho 

1200 

1200 

LONGV 

 weaencs 

INTX+137 

137 

INTX 

137 

|: alaetaaatiiaa 

INTX !MINUSX+137 


INTX !MINUSX+137 
MINUSX+137 


INTX 

MINUSX+137 

INTX+137 

MINUSX+137 

DISPLAY ON CONSOLE #0 THE X-Y READOUT VALUE 

oes ORES ATS ;DISABLE CONSOLE #1 


;OCTOGON BY LENGTH OF 137 


( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 


ww Se Ss SS Ss SS Ss SS SS SS Se 
dd i i ed ee te ee ee ed 


DLT14A: 


DLT14B: 


DJMP 

MSOPEN: ; JUMP TO PEN SWITCH MESSAGE FOR CONSOLE #0 
-SBTTL DISPLAY ON CONSOLE #1 THE X-Y READOUT VALUE 

LPRTA: CONSL1!BIT7!BIT6!BITS!BIT4 ENABLE CONSOLE #1 
pe alee BITS DISABLE CONSOLE #0 


;POSITION THE X-Y MESSAGE 





N 
CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17=SEP=79 08:50 PAGE 37-2 
CZVSOC.P11 11-SEP-79 09:01 DISPLAY ON CONSOLE #1 THE X=Y READOUT VALUE 


-A /X=/ 
030060 DLT14C: .ASC /1000/ 
040 B 40,40,40 
Oe ooeb = 


/Y= / 
30060 DLT14D: /1000/ 
POI 
;POSITION THE PEN SWITCH MESSAGE FOR CONSOLE #1 
0000 
022414 MS1PEN: 


PENOF 1 
-SBTTL DISPLAY HIT COUNT MESSAGE 
022416 LPRTC: POINT! INT4!LPON 
001300 1300 


; JUMP TO MESSAGE FOR #1 


200 

ee re ENABLE CONSOLE #0 
020124 047503 : /HIT COUNT = 0000/ 
60000 : DJMP 
022452 022614 
022454 042520 020116 053523 t . /PEN SWITCH #0 IS OFF/ 
022500 160000 


022346 
042520 020116 053523 : /PEN SWITCH #0 IS ON / 
160000 


022346 

042520 020116 053523 os /PEN SWITCH #1 IS OFF/ 
160000 MP 

022416 
042520 020116 053523 f. /PEN SWITCH #1 IS ON / 


160000 
022612 022416 


HORIZONTAL REF. LINE SECTION 
022614 114000 
000000 


zPOINT TO X CORDINATE ‘0° 
7Y CORD. = 640 

:DRAW 30 UNIT VERTICAL LINE 
sPOINT TO X CORDINATE ‘'200°' 


7Y CORD. = 640 
sDRAW 30 UNIT VERTICAL LINE 
022656 





CZVSDC _VS60 VISUAL DISPLAY TEST 
CZVSOC.P11 09:01 


2855 


Nm ~m 
DWAR ARADRAR ARR ADWRA AAA 
wocoo 


N 
kk ek a a YD et ot I a et 2 ot a 
wee vevuOQueuvvs @vyeuvvyuunvvuvvy 


N 
AKA RRDWRARARA 


: 


Ee te eT 
— ss - 2 oS 


a oe ee ee et 
— 
eee Se I we we 


2862 


11-SEP- 
114000 
0004 


047503 051117 


B & 
MACY11 30G6(1063) 17-SEP-79 08:50 
HORIZONTAL REF. LINE SECTION 


POINT 


PAGE 37-3 


:POINT TO X CORDINATE 


Y CORD 


; . = 640 
;DRAW 30 UNIT VERTICAL 
;POINT TO xX CORDINATE 
7Y CORD. = 640 
;DRAW 30 UNIT VERTICAL 


;POINT TO X CORDINATE 


Y CORD 


$ - = 640 
;DRAW 30 UNIT VERTICAL 


:POINT TO X CORDINATE 


:Y CORD. = 640 
[DRAW 536 UNIT VERTICAL 


;POINT TO X CORDINATE 


:Y CORD. = 640 
DRAW 30 UNIT VERTICAL 


:POINT TO X CORDINATE 
:Y¥ CORD. = 640 

;DRAW 30 UNIT VERTICAL 
:POINT TO X CORDINATE 


7Y CORD. = 640 
DRAW 30 UNIT VERTICAL 


-SBTTL VERTICAL SPACEING SECTION 


POINT 
200 
10 


CHAR 
-ASCII /X COORD = 200 / 
POINT 


200 
60 


LONGV 
INTX! 200 


DRAW LOWER LINE 


*%00°' 


LINE 


*600°' 


LINE 


*"000°' 


LINE 


"*1200°" 


LINE 


*"1400°" 


LINE 


*"600°' 


LINE 


“1777"" 


LINE 


SEQ 0092 


C & 
17-SEP-79 08:50 PAGE 37-4 





CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G6(1063) 
CZVSDC.P11 11-SEP-79 09:01 VERTICAL SPACEING SECTION SEQ 0093 

(1) 023044 000000 0 

(1) 023046 009000 Q 

(1) 023050 000011 9. 

(1) 023052 060200 INTX !MINUSX ! 200 ;DRAW NEXT HIGHER LINE 
(1) 023054 0 

(1) 023056 0 

(1) 023060 000011 7. 

(1) 023062 040200 INTX! 200 DRAW NEXT HIGHER LINE 
(1) 023064 0 

(1) 023066 0 

(1) 023070 000011 9. 

(1) 023072 060200 INTX !MINUSX ! 200 ;DRAW UPPER LINE 

(1) 023074 000000 0 

(1) 023076 000000 0 

(1) 023100 000040 40 OFFSET FOR NEXT LINE 
2894 023102 110000 LONGV DRAW LOWER LINE 

-€1) 023104 040200 INTX! 200 sitio iehtaesanaenaleeatin 
(1) 023106 0 

(1) 023110 0 

(1) 023112 000010 8. 

(1) 023114 060200 INTX !MINUSX ! 200 ;DRAW NEXT HIGHER LINE 
(1) 023116 000000 0 

(1) 023120 0 

(1) 023122 000010 8. 

(1) 023124 040200 INTX! 200 ;DRAW NEXT HIGHER LINE 
(1) 023126 0 

(1) 0231 0 

(1) 023132 000010 8. 

(1) 023134 060200 INTX !MINUSX ! 200 ;DRAW UPPER LINE 

(1) 023136 0 

(1) 023140 000000 0 

(1) 023142 000040 40 OFFSET FOR NEXT LINE 
2895 023144 110000 LONGV DRAW LOWER LINE 

(1) 023146 040200 INTX! 200 

(1) 023150 000000 0 

(1) 023152 0 

(1) 023154 000007 7 

(1) 023156 060200 INTX !MINUSX ! 200 DRAW NEXT HIGHER LINE 
(1) 023160 000000 0 

(1) 023162 0 

(1) 023164 7 7 

(1) 023166 040200 INTX! 200 DRAW NEXT HIGHER LINE 
(1) 023170 0 

(1) 023172 0 

(1) 023174 000007 7 

(1) 023176 060200 INTX !MINUSX ! 200 ;DRAW UPPER LINE 

(1) 023200 0 

(1) 023202 0 

(1) 023204 40 OFFSET FOR NEXT LINE 
2896 023206 110000 LONGV DRAW LOWER LINE 

(1) 023210 040200 INTX! 200 

(1) 023212 000000 0 

(1) 023214 000000 0 

(1) 023216 000006 6 

(1) 023220 060200 INTX !MINUSX ! 200 DRAW NEXT HIGHER LINE 
(1) 023222 000000 0 


Dé 
CZVSDC VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17-SEP-79 08:50 PAGE 37-5 
CZVSOC.P11 11-SEP-79 09:01 VERTICAL SPACEING SECTION 


023224 000000 
000006 
040200 
000000 


~ 
—_ 
~ 
oO 


NTX! 200 ;DRAW NEXT HIGHER LINE 


NTX !MINUSX ! 200 ;DRAW UPPER LINE 


Fe en ta a tn 
et od = ow od 
COO AnOO—a 


40 OFFSET FOR NEXT LINE 
LONGV DRAW LOWER LINE 
INTX! 200 


SN we I Soe YS wea we 


Moo 


INTX!MINUSX ! 200 ;DRAW NEXT HIGHER LINE 


NTX! 200 ;DRAW NEXT HIGHER LINE 


NTX!MINUSX ! 200 ;DRAW UPPER LINE 


wee ervyrvrervev vw 
LOO NOC NOD 


0 OFFSET FOR NEXT LINE 
LONGV DRAW LOWER LINE 
 weettones 


3 


INTX!MINUSX ! 200 ;DRAW NEXT HIGHER LINE 
NTX! 200 DRAW NEXT HIGHER LINE 


NTX !MINUSX ! 200 :DRAW UPPER LINE 


(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 
(1) 


S°°s foo £00 


OFFSET FOR NEXT LINE 
DRAW LOWER LINE 


3 


LONGV 
poner 


INTX !MINUSX ! 200 DRAW NEXT HIGHER LINE 


NTX! 200 DRAW NEXT HIGHER LINE 


Ce te ee te te on, he a a to 
ee a ed od od 23 
eee we we ae ee 





E & 
CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 30G(1063) 17=SEP=79 08:50 PAGE 37-6 


CZVSDC.P11 11-SEP-79 09:01 VERTICAL SPACEING SECTION SEQ 0095 
(1) 023404 000003 3 
(1) 023406 060200 INTX!MINUSX ! 200 ; DRAW UPPER LINE 
(1) 023410 000000 0 
(1) 023412 000000 0 
(1) 023414 000040 40 OFFSET FOR NEXT LINE 
2900 023416 110000 LONGV ;DRAW LOWER LINE 
(1) 023420 040200 INTX!200 
(1) 023422 000000 
(1) 023424 0 
(1) 023426 000002 2 
(1) 0234 060200 INTX !MINUSX! 200 ;DRAW NEXT HIGHER LINE 
(1) 023432 000000 0 
(1) 023434 0 
(1) 023436 2 2 
(1) 023440 040200 INTX! 200 :DRAW NEXT HIGHER LINE 
(1) 023442 0 
(1) 023444 0 
(1) 023446 2 2 
(1) 023450 060200 INTX!MINUSX! 200 :DRAW UPPER LINE 
(1) 023452 0 
(1) 023454 0 
(1) 023456 000040 40 OFFSET FOR NEXT LINE 
304 -SBTTL VARIABLE HORIZ. LINE LENGTH 
2903 023460 114000 POINT 
2904 023462 001000 1000 
2905 023464 000020 20 
2906 100000 CHAR 
2907 023470 020130 047503 051117 ASCE /X COORDINATE = 1000 / 
2909 000600 mM=600 
2921 023514 114000 POINT . :POINT TO Y CORD. ‘'M'' 
(1) 023516 001000 1000 
(1) 023520 000600 M 
(1) 023522 110000 LONGV ;DRAW A VECTOR ‘' L ‘* UNITS LONG 
(1) 023524 040001 INTX! L 
(1) 023526 000000 0 
(1) 023530 114000 POINT ;POINT TO Y CORD. "'M“"' 
(1) 023532 001000 1000 ‘ 
(1) 023534 000560 M 
(1) 023536 110000 LONGV DRAW A VECTOR "'L ‘* UNITS LONG 
(1) 023540 040002 INTX! L 
(1) 023542 000000 0 ; 
(1) 023544 114000 POINT :POINT TO Y CORD. ‘'M“' 
(1) 023546 001000 1000 
(1) 023550 000540 M 
(1) 023552 110000 LONGV ;DRAW A VECTOR *'L ‘* UNITS LONG 
(1) 023554 040003 INTX! L 
(1) 023556 000000 0 
(1) 023560 114000 POINT :POINT TO Y CORD. "'M“ 
(1) 023562 001000 1000 
(1) 023564 000520 M 
(1) 023566 110000 LONGV sDRAW A VECTOR ‘' L ‘* UNITS LONG 
(1) 023570 040004 INTX! L 
(1) 023572 000000 0 
(1) 623574 114000 POINT :POINT TO Y CORD. ''M“' 


Seer VS60 VISUAL <p 


( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
C 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 


me nd 2 at 2 8 ot 2g I Sh 0 8 a a ot ot od I ot 2) I a ot 2 to 2 a 1 ot HS 
ee ee ee ee ee eS ee ee ee a ee a a 


MACY11 306(1063) 


F 
17-SEP-79 


VARIABLE HORIZ. LINE LENGTH 


1000 
M 


LONGV 
INTX! 
0 


POINT 
1000 
M 


LONGV 
INTX! 


0 
POINT 
1000 


M 
LONGV 
INTX! 


0 
POINT 
1000 


M 
LONGV 
INTX! 


0 
-POINT 
1000 

M 


LONGV 
INTX! 
0 


POINT 
1000 
M 
LONGV 
INTX! 


0 
POINT 
1000 


M 
LONGV 
INTX! 


0 
POINT 
1000 
M 


LONGV 
INTX! 


POINT 
10006 


M 
LONGV 
INTX! 


0 
POINT 
1000 
M 


8 
08:50 PAGE 37-7 


;DRAW A VECTOR "'L 
;POINT TO Y CORD. 
;DRAW A VECTOR ‘'L 
;PCINT TO Y CORD. 
DRAW A VECTOR "'L 
sPOINT TO Y CORD. 
;DRAW A VECTOR **L 
;POINT TO Y CORD. 
;DRAW A VECTOR ‘'L 
;POINT TO Y CORD. 
DRAW A VECTOR *'L 
:POINT TO Y CORD. 
DRAW A VECTOR “'L 
zPOINT TO Y CORD. 
DRAW A VECTOR ‘'L 
:POINT TO Y CORD. 
DRAW A VECTOR “*L 


:PCINT TO Y CORD. 


"* UNITS 


"* UNITS 


"* UNITS 


~~ oo = 


** UNITS 


a 


"* UNITS 


"* UNITS 


a 


** UNITS 


Mm oe 


** UNITS L. 


Mm ee 


** UNITS 


‘"'M se 





G 8 
5 a VS60 VISUAL DISPLAY TEST MACY11 30G6(1063) 17=SEP=79 08:50 PAGE 37-8 
CZVSDC.P11 11=SEP=79 09:01 VARIABLE HORIZ. LINE LENGTH 


023756 110000 LONGV ;DRAW A VECTOR ‘'L ‘’ UNITS 
023760 INTX! 


0 

POINT :POINT TO Y CORD. ‘'M"’ 
1000 

LONGV s SDRAW A VECTOR ‘LL ‘* UNITS 
INTX! 


0 
POINT POINT TO Y CORD. **M*’ 
— 


pot :DRAW A VECTOR ‘'L ‘' UNITS 


POINT - sPOINT TO Y CORD. ‘'M "" 
1000 


M 
or} ;DRAW A VECTOR *'L ‘' UNITS 1 


0 - 
POINT ;POINT TO Y CORD. ''M"* 
1000 


M 
Pope ;DRAW A VECTOR ‘' L ** UNITS 


0 
POINT ;POINT TO Y CORD. ‘'M"’ 
1000 


M 
road ;DRAW A VECTOR ‘' L ** UNITS 
ees 


POINT :POINT TO Y CORD. "'M°' 
1000 


M 
Seent ‘ ;DRAW A VECTOR ‘'L ** UNITS 


0 
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~~ 
—s 
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024072 
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( 
( 
( 
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( 
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NA a Ss SS SS oS es SS So I SS HS oh SS 3 Hh I 2 HS a I SI a SH SS 
Nw we wwe we wwe wwe Yew wey we Yew YY YM YY YY SYS ww YS we ww 


024074 


CHAR CHAR MODE 
031040 030060 . /X= 200/ 


CHAR 
030061 030060 ‘ /X=1000/ 


100000 C 
024140 036530 030061 033467 ‘ /X=1077/ 
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2939 


024146 
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3600 
036531 033461 
114000 


pet 033061 


pete: 032461 


3000 
036531 032061 


eo i oon a er) 


030060 


030060 


030060 


030060 


Ve We 


MACY11 30G6(1063) 


+ Va @s Fe Vis Hc Me Re we 


J=1000 
POINT 


20 

1700 

CHAR ! INT7 

nye fe /Y=1700/ 


HAR! INT6 
mye /Y=1600/ 


LONGV 
a 
RELATP 


57600 
POINT 


!INTS 
ASCII = /¥=1500/ 
NT 


LONGV 
haber 
RELATP 


57600 
POINT 


!INT4 
ASCII. /Y¥=1400/ 
NT 


Ve San Ua Oa He Me Se . . . 


H 8 
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INTENSITY LEVEL SECTION OF LIGHT PEN TEST 


; CHAR MODE 


;DRAW HORIZ. LINE 


; CHAR MODE 


;DRAW HORIZ. LINE 


CHAR MODE 


;DRAW HORIZ. LINE 


CHAR MODE 


;DRAW HORIZ. LINE 


SEQ 0098 
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a oe el ei 2 ee 
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024524 


024526 
024530 
024532 


11-SEP-79 09:01 


031461 


031061 


030461 


030061 


iad ee de ee a en ee 


030060 


030060 


030060 


030060 


Ot oe ee ee ek “7.8 
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INTENSITY LEVEL SECTION OF LIGHT PEN TEST 


1300 

CHAR! INT3 ;CHAR MODE 
eASCII /¥=1300/ 

POINT 


200 

1300 
LONGV 
—— 


RELATP 
57600 
POINT 


;DRAW HORIZ. LINE 


200 
CHAR! INT2 CHAR MODE 
eee /Y=1200/ 


:DRAW HORIZ. LINE 


0 
CHAR! INT1 CHAR MODE 
eASCII. /Y=1100/ 
POINT 


;DRAW HORIZ. LINE 


1000 

CHAR! INTO CHAR MODE 
ASCII = /¥=1000/ 

POINT 


200 
1000 


LONGV 
 peinienes 


RELATP 
57600 


-SBTTL DRAW OUTER REFERENCE BOX 
POINT! INTS 

0 

0 


;DRAW HORIZ. LINE 


CE eeeeetinmesneedtitiieie aii’ 


SEQ 0099 


CZVSDC _VS60 VISUAL DISPLAY TEST 


CZVSOC. P11 


024752 


024754 
0 


024766 


024770 
024772 
024774 


024776 
025000 
025002 


11=SEP=79 09:01 


110000 
041777 
000000 


040000 
001777 
061777 
000000 


040000 
021777 
173400 


160000 
022224 


160000 
026246 


113006 
040000 
021777 


026524 


a © 
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DRAW OUTER REFERENCE BOX 


LONGV 

 pemtees 

INTX 

MAXY 

INTX !MINUSX ! MAXX 


-SBTTL 
SBTTL KEYBOARD CHARACTER ECHO SUB-P1CTURE 


ECHOFR: POINT 


ECODEV: 
ECHJMP: 


MAXY~200 
STATSA! SYNC40 ENABLE SYNC 
con ENABLE NORMAL CHAR. SIZE 


BYTE 17,17 
-ASCII /KEYBOARD CHARACTER ECHO LOOP/<15><12> 
CTRL C TO Sl ae siaaiaarticaal 


CII /CHARACTER CODE 
BYTE 0,0 9 0.0 ZOCTAL VALUE CODE IS LOADED HERE 
DIMPR10 . :BR OVER IF NOT ‘‘SHIFTOUT'’ MODE | 


eASCII = /SHIFT-OUT MODE/ 
SYTE: 15.12 

DJMP 

BUFFER 


- SBTTL 
-SBTTL DYNAMIC EXT. STOP FRAME 
- SBTTL 


e 
> 
n“n 
oO 
_ 
hae 
~ 


: DISPLAY A BOX AROUND THE SCREEN 


FRME17: 


EACH LINE IS A DIFFERENT LINE TYPE AND INTENSITY LEVEL 


CONSLO!BIT7!BIT6 ENABLE CONSOLE #0 
ty lates dre CONSOLE #1 


MAXY :TO TOP LEFT CORNOR 
DNAME !B1TO ;LOAD NAME REG. WITH #1 
non Ph tte ;LONG VECTOR WITH INTENS. 6 AND LINE TYPE 3 


INTX 
0 


LONGV! INT4!LINE2 
INTX 
MINUSX ! MAXY 


;LONG VECTOR WITH INTENS. 4 AND LINE TYPE 2 





SEQ 0100 


k ¢ 
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025004 112405 LONGV! INT2!LINE1 ;LONG VECTOR WITH INTENS. 2 AND LINE TYPE 1 
025006 777 
025010 
025012 113604 2 nese pean ;LONG VECTOR WITH INTENS. 7 AND LINE TYPE 0 


025014 040000 
025016 001777 MAXY 


061 ee 
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025020 


02 
025070 


025072 
025074 
025076 
025100 
025102 
025104 
025106 


025120 


025126 


025130 
025132 


124000 
001640 


001510 001520 


001630 001620 
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;DISPLAY A DIAMOND == WITH SHORT VECTORS AND DIFFERENT INTENSITY LEVELS 


DNAME !BIT2 ;LOAD NAME REG. WITH BIT 2 
POINT 
1000 
1500 
SHORTV! INT1 
7677 s+X +Y 
SHORTV! INT3 
17677 so oT 
SHORTV! INTS 
77777 sok -Y 
SHORTV! INT7 a 
57777 rox +Y 


“DISPLAY FOUR BLINKING POINTS ‘== WITH’ RELATIVE POINT ‘AND ‘BLINK “ENABLED: 


DNAME 'BIT3 ;LOAD NAME REG. WITH #10 
POINT 
1000 
700 
RELATP! INT4!BLKON SRELATIVE POINT AND BLINK ON 
57677 r+X +Y 
77677 r+ -V 
77777 i-X -Y 
57777 rox +7 
sDISPLAY FIVE GRAPHPLOT X DATA POINTS 
DNAME 'BIT4 ;LOAD NAME REG. WITH BIT4 
STATSB! INCR+10 ;LOAD GRAPH INCREMENT 
POINT 'BLKOFF 
1000 
1600 


GRAPHX 
1500, 1510, 1520, 1530, 1540 


;DISPLAY FIVE GRAPHPLOT Y DATA POINTS 


pene ate ;LOAD NAME REG. WITH BITS 


GRAPHY 
1640, 1630, 1620, 1610 


SEQ 0102 


i re a i ee ee 


CZVSDC VS60 VISUAL DISPLAY TEST 


CZVSDC.P11 


WWWNWWIWWWWNAWNWNWWW 
and cal co and and ad a ee ee ch ee cal 
RASLESELRAL 


Oo 
wn 


025142 


025150 
025152 


025172 


025174 
025176 
025200 
025202 


025210 


025212 
025214 


025216 
025220 


025222 
025224 


11-SEP-79 09:01 


066100 
072100 


‘ M 8 
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;DISPLAY AN OCTOGON == USING BASIC VECTOR'S 
DNAME !BITS!BIT4 ;LOAD NAME REG. WITH #60 
POINT 
1540 
640 


BASICV 
INTX!PATHO! 100 


INTX! PATHS! 100 
INTX!PATH6! 100 
INTX!PATH?! 100 
:DISPLAY A LARGE SQUARE IN THE CENTER -- USING ABSOLUTE VECTORS 
DNAME !BIT6 :LOAD NAME REG. WITH BIT6 
POINT 
400 
400 
ABSVCT 
INTX! 1400 
400 
INTX! 1400 
1400 
INTX!400 
1400 


INTX!400 
400 


SEQ 0103 


N 
CZVSDC _VS60 VISUAL DISPLAY TEST MACY11 306(1063) 17-SEP-79 08:50 PAGE 40 
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NOW USE CHAR MODE AND DISP. JSR'S, CHAR. ROTATE, CHAR ITALICS 


025226 DNAME !BIT8 ;LOAD Oe te REG. WITH BIT8 
025230 006 STATSA!ITAL1 7 ITALICS 
025232 : CHRRT1 ; CHAR. ROTATE ON 


025234 162000 DJSR ABSOLUTE JSR TO CHAR. FRAME 
025236 SHOWCH 


;NOW USE CHAR MODE, DISP. JSR'S 


025240 DNAME !BIT9 ;LOAD NAME REG. WITH BIT9 
025242 STATSA! ITALO ITALICS OFF 
025244 CHRRTO CHAR. ROTATE OFF 


025246 DJSRR!1 ;RELATIVE DJSR TO CHAR. FRAME 
025250 DJMPR ! 36 RELATIVE DJUMP OVER CHAR. SUBROUTINE 


025252 : PCINT 
025254 000200 200 
025256 200 


025260 CHARSO SET CHAR. SIZE TO 00 
025262 100000 CHAR 
025264 027060 020065 -ASCII 0.5 SIZE" 


ad ced cad ad cd cd ee 
CONQAUISWIO 


025276 154240 CHARS1 SET CHAR. SIZE TO 01 
025300 


020040 027061 020060 -ASCII 1.0 SIZE"’ 


025312 154300 CHARS2 SET CHAR. SIZE TO 10 
025314 020040 027061 020065 -ASCII 1.5 Size" 


025326 154340 CHARS3 SET CHAR. SIZE TO 11 
0253 020040 027062 020060 -ASCII 2.0 SIZE"’ 
154240 CHARS 1 RESET CHAR. SIZE TO NORMAL 
166000 DPOP sEXIT 





B . 
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DISPLAY A RECTANGLE IN THE MENU AREA == USE DIFFERENT VECTOR SCALES 


SFILE2: DNAME!BIT9!BITS ;LOAD NAME REG. WITH #1400 
DMENU1 ENABLE THE MENU AREA 
pee 


40 


VCTROO! 17 ;LOAD VECTOR SCALE 
LONGV 

INTX DRAW VERT. LINE 
400 


VCTROO!1 ;LOAD VECTOR SCALE 
INTX! 700 
025374 0 
025376 VCTROO! 17 ;LOAD VECTOR SCALE 
025400 040000 INTX 
025402 MINUSX ! 400 DRAW VERT. LINE 
025404 154021 ;LOAD VECTOR SCALE 
025406 060700 
025410 
025412 170040 STATSA! ITALO ;DISABLE ITALICS 
025414 154024 VCTROO!4 RETURN TO NORMAL SCALE 
025416 170002 DMENUO EXIT MENU AREA 
025420 173400 DSTOP 


025422 160000 DUMP 
025424 024754 FRME17 


VCTROO!1 
"yee !MINUSX! 700 


; JUMP TO START OF FILE 


025426 164700 CONSL1!BIT7!B1T6 ENABLE CONSOLE #1 
025430 POINT! INT4!BLKON 
000000 0 


1000 
STATSA! ITALO ITALICS OFF 
155000 CHRRTO CHAR. ROT. OFF 
025442 CHARS3 


025444 100000 CHAR 
0 DJSR ;JSR TO ASCII ERROR MESSAGE 
WHYO ;ADDRESS OF ERROR TYPE 
100020 CHAR ! BLKOF F 
173400 | DSTOP 
160000 DJMP 
025426 FRM17E 
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047516 042440 052130 WHYO: .ASCII /NO EXTERNAL STOP INTERRUPT/ 
166000 DPOP 


025462 
025514 
025516 047125 054105 042520 WHY1: .ASCII /UNEXPECTED INTERRUPT TO VECTOR +4 / 
025560 166000 DPOP 


025562 047125 054105 042520 : ASCII] /UNEXPECTED INTERRUPT TO VECTOR +10/ 
025624 166000 DPOP 


025626 047125 054105 042520 : ASCII /UNEXPECTED INTERRUPT TO VECTOR +14/ 
025670 166000 DPOP 
025672 027104 027120 027103 :  .ASCII /D.P.C. TOO 1.0W/ 
025710 166000 DPOP 
309 025712 027104 027120 027103 : ASCII /D.P.C. TOO HIGH / 
--025732 -.166000 _ DPOP 


025734 052123 050117 044440 :  .ASCII /STOP INTERRUPT BUT NO STOP FLAGS/ 
025774 166000 BPOP 





— 
oS 


V 
3 


a aa ad eb eh od eb od od od no a a a ch od od ed ange gah aha abalbatnadah aaah 


ae te Eee te a Et ee hi ta a a te te, ta, a, at et ee a, Et, at et a a a et a ee, a a 
ee Ne ae ee ee a ee ee ee ee ee ee ee ee a ee ee eee ee ee eee ee ee ee ee 
: 


(1) 


Ep 


Vv 


—< 
“3 
rr 


025776 
025776 
6004 


026160 


em 


DIS 
p- 


a5 
mre 
— 


l= 


3 
2 


032777 
7 


000416 


2 


AY TEST 
01 


007664 


153134 


153116 


000004 


153050 
001102 


001176 


153010 


152770 
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SCOPE HANDLER ROUTINE 


-SBTTL SCOPE HANDLER ROUTINE 


PeTI Iti titi titi iii iii iii iii iiiiit iii iitiiiiiiiiiiiiitiiiy, 

:STHIS oo Ce CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 

{AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 

oT SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 


14=1 LOOP ON TEST 
*SWO8=1 LOOP ON TEST IN SWR<7:0> 
7 *CALL 
3* SCOPE 3; SCOPE=I0T 
SSCOPE: 
BIT #B1T14,aSWR a. IF etn 1 
BNE SOVER . F SET 
TST HOLD “TEST IF LOOP ON PICTURE ? 
BNE SOVER ‘BR IF LOOP ON THIS TEST 
1$: BIT #B1T14,aSWR ;;LOOP ON PRESENT TEST? 
BNE SOVER sYES IF SwW14=1 
;AHHAASTART OF CODE FOR THE XOR TESTERMMNEA 
$XTSTR: BR 6$ 321F RUNNING ON THE Hy a? TESTER CHANGE 
+e THIS INSTRUCTION T *NOP’’ (NOP=240) 
MOV @FVERRVEC ,-(SP) E THE CONTENTS OF A THe ERROR VECTOR 


MOV ooteecnee :3SET FOR TIMEOUT 


TST a#177060 TIME OUT ON XOR? 
MOV (SP)+, @#ERRVEC : :RESTORE THE ge VECTOR 
BR SSVLAD :GO TO THE NEXT TEST 
5$: CMP (SP)+, (SP)+ :CLEAR THE STACK AFTER A TIME OUT 


MOV (SP) +, @#ERRVEC 3 SRESTORE THE ERROR VECTOR 

BR SOVER LOOP ON THE PRESENT TES7 
6$:;MAHAMEND OF CODE FOR THE XOR TESTERMMMAH 

BIT #B1T08,aSwR +: LOOP ON SPEC. TEST? 

BEQ $SSVLAD F_NO 

CMPB @SWR ,STSTNM 330N THE RIGHT TEST? SWR<7 :0> 


BEQ SOVER ::BR IF YES 
$SVLAD: INCB STSTNM COUNT TEST NUMBERS 
MOVB STSTNM,STESTN SISET TEST NUMBER IN APT MAILBOX 


MOV (SP) , SLPADR ; 22 SAVE SCOPE LOOP ADDRESS 

CLRB SERFLG ZERO THE ERROR FLAG 
SOVER: MOV $TSTNM,@DISPLAY : :DISPLAY TEST NUMBER 

ati SLPADR, (SP) tS 3) _— ADDRESS 


_ ‘Oe IF IF ne CONTROL 
BIS #BI1T6,a$TKS ENABLE KEYBOARD INTR. 


APTSIZE=200 


SEQ 0107 





CZVSDC 


vs60 Vv 


CZVSDC.P11 


026240 
026246 


ISUAL DI 
11=SEP- 


PLAY TEST 
09:01 


000000 000000 


~~ a ap a Ls 


OPE HANDLER R 


17=SEP=79 08:50 PAGE 44 
OUT INE 


DISPATCH TABLE OF THE STARTING ADDRESSES OF EACH TEST 


DISPTC: TST1 
TS 


BUFFER: 0 
END 


; X, Y. AND Z UNUSED. 


; USE REMAINING CORE UNDER 12k FOR BUFFER. 


SEQ 0108 


ee 
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CZVSDC.P11 11=SEP=79 09:01 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0109 
ABASE = 172000 204 30 
ABSVCT= 144000 1694 1778 1834 1889 . 1955 2182 3190 
ACDW1 = 000000 30 
ACDW2 = 000000 30 
ACPUOP= 000000 30 
ACRLF 004440 _ 668 6764 
ADDWO = 000000 30 
ADDW1 = 000000 30 
ADDW10= 000000 30 
ADDW11= 000000 30 
ADDW12= 000000 30 
ADDW13= 000000 30 
ADDW14= 000000 30 
ADDW15= 000000 30 
ADDW2 = 000000 30 
ADDWS = 000000 30 
ADDW4 = 000000 30 
ADDWS = 000000 30 
ADDW6 = 000000 30 
ADDW7 = 000000 30 
ADDW8 = 000000 30 
ADDW9 = 000000 30 
ADEVCT= 000000 30 
ADEVM = 000000 30 
AENV = 000000 30 

NVM = 000000 30 
AFATAL= 000000 30 

1= 000000 30 
AMADR2= 000000 30 
AMADR3= 000000 30 
= 000000 30 
AMAMS1= 000000 30 
AMAMS2= 000000 30 
= 000000 30 
= 000000 30 
AMSGAD= 000000 30 
AMSGLG= 000000 30 
AMSGTY= 000000 30 
AMTYP1= 000000 30 
AMTYP2= 000000 30 
AMTYP3= 000000 30 
AMTYP4= 000000 30 
APASS = 000000 
APRIOR= 000200 22n 30 
APTSIZ= 000200 33304 
ASWREG= 000000 30 
ATESTN= 000000 30 
AUNIT = 000000 30 
AUSWR = 000000 30 
AVECT1= 100320 214 30 
AVECT2= 30 
BADDON 006542 1010 1013 1016 1019 1021 1023 10274 
00644 992 10094 
BAD1 006456 960 10114 
BAD2 0064 70 962 10144 
BAD3 006502 964 10174 
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CZVSOC.P11 11-SEP-79 09:01 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0110 
006514 984 10204 
BADS 006524 987 10224 
006534 10244 
BASICS= 134000 1684 976 1985 
BASICV= 120000 1 416 1703 1708 1713 1718 1723 1728 1733 1738 2002 2067 2194 
2211 2227 2706 3173 
BEGIN 001336 25 68 123 970 
BITO = 000001 184 218 245 1001 1421 1422 1443 1480 3098 
BITOO = 000001 184 
BITO1 = 000002 184 
BITO2 = 000004 184 
BITO3 = 000010 184 
B1T04 = 000020 184 
BITOS = 000040 184 
BITO6 = 000100 184 
BIT07 = 000200 184 
B1T08 = 000400 184 3321 
BITO9 = 001000 184 
BIT] = 2 184 217 244 1419 1420 1441 1478 
BIT10. = 002000 184 206 210 242 
BIT11 = 000 184 
BIT12 = 010000 184 505 506 513 517 518 525 529 530 537 541 542 549 
980 114 1996 1997 
B1T13 = 020000 184 8 585 1145 
BITI4 = 040000 184 253 1034 1153 3321 
BIT15 = 100000 184 1289 
BIT2 = 184 1417 1418 1439 1476 2769 2770 3119 
BITS = 000010 184 341 1415 1416 1437 1474 2769 2770 3134 
BIT4 = 000020 ake 37 240 248 1413 1414 1435 1472 2769 2770 2795 2817 3146 
BITS = 000040 osiy si59 sfat 247 1411 1412 1433 1470 2769 2770 2776 2795 2796 
BIT6 = 000100 184 2 238 290 364 439 608 629 1070 1133 1324 1325 1389 
1394 1401 1409 1410 1431 1468 1489 1751 1998 2063 2104 2168 2241 
v4 2307 2358 2378 2591 2769 2770 2795 2817 3092 3093 3185 3277 
BIT? = 000200 184 2 364 439 597 608 629 979 1102 1137 1324 1325 1383 
1388 1389 1394 1401 1407 1408 1429 1466 1489 1751 1998 2063 2104 
2168 2241 2288 2307 2358 2378 2591 2769 2770 2776 2795 2796 2817 
3092 3093 3277 
BIT8 = 000400 184 213 33 486 1161 1405 1406 1427 1464 2160 3244 
BIT9 = 001000 184 205 207 211 23 0 1241 1403 1404 3215 3244 
BLKOFF= 000020 1874 2115 2126 2137 2148 3148 3288 
BLKON = 000030 1884 2112 2123 2134 2145 3138 3278 
BPTVEC= 000014 184 
BUFFER 026246 363 427 433 438 466 477 607 622 627 647 703* 704* 707 
709* 712 726* 727* 728* 731 733* 736 787 868 903 924 
932 945 973 1057 66 1196* 2184 2726 3083 33594 
CHAQU 020666 601 25914 2688 
CHAR = 100000 1604 633 1326 1384 1390 2035 2076 2093 2105 2115 2126 2137 2601 


3285 
CHARQA 021424 614 2717 27304 
CHARQD 021722 27454 
CHARSO= 154200 2354 236 237 238 2601 2614 2627 2635 2673 2684 3226 
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CZVSDC.P11 11-SEP-79 09:01 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0111 
CHARS1= 154240 2364 2041 2103 2601 2614 2627 2635 2673 2684 2685 3070 3230 3238 
CHARS2= 154300 2378 «2601 2614 2627 2635 2673 2684 3233 
CHARS3= 154340 2384 2033 2601 2614 2627 2635 2673 2684 3236 3283 
CHRRTO= 155000 2328 233 628 703 2722 3217 3282 
CHRRT1= 155400 2334 726 2714 3208 
CNTR 007670 871* 874" 1117% 1122* 12114 
CONSLO= 164000 2124 1324 1388 1394 2770 2796 2817 3092 
CONSL1= 164400 2134 364 439 608 629 1325 1383 1389 1401 1489 1751 1998 2063 
2104 2168 2241 2288 2307 235 2378 2591 2769 2776 2795 3093 3277 
COUNT 010006 575* 1222* 1233* 12484 
CR = 000015 184 
CRLF = 000200 184 
DDISP = 177570 184 30 69 
001316 57# 74 76 81 97s 569* 594* 1032* 
DDONET 001320 584 100* 
DELAY 001256 37a 330 
DELTX6 010070 788* 796* 797 808 12754 
DELTX7 016136 815* 827* 828 21924 
DELTY6 010072 789* 791* 792 794* 809 12764 
DELTY7 016416 832% 853* 854 22094 
DELT11 016676 831* 850 852* 22264 
DFII10A 016142 21944 2203 
DFI11C 016422 22114 2220 
DIDINT 007650 975* 988 1002* 12024 
DISPLA 001142 304 69* 3321* 
DISPRE 000174 254 69 
DISPTC 026162 140 144 33344 
DJMP = 1 2044 205 206 26 465 617 646 802 867 931 1062 1 1483 
1742 1991 2008 2022 2043 2081 2095 183 2202 2219 2235 252 2269 
2299 2338 2363 373 2471 2583 2687 2725 2 2810 20 2824 2827 
2830 2833 3061 3082 3273 3290 
DJMPR = 161000 2054 2160 3078 3220 
DJSR = 162000 2 207 613 2036 2039 2077 2317 2319 2333 2335 2642 2645 2648 
2651 3210 328 
DJSRR = 163000 20784 2721 3219 
DLT14A 022314 107* 108* 1156 2782# 
DLT14B 022326 109* 110* 1159 27854 
DLT14C 022364 111* l12* = 11 28024 
DLT14D 022376 113% 114* 1167 28054 
= 170002 2174 218 1586 2210 2723 3269 
DMENU1= 170003 2184 53 2255 2702 3245 
DNAME = 150000 2494 3098 3119 3134 3146 3157 3168 3185 3206 3215 3244 
DNOP = 164000 2094 211 212 3 1086 24 1825 1826 1827 1828 1880 1881 
1882 1883 1935 1936 1937 38 2654 2655 2656 2657 2658 2659 2660 
DPC 001264 968* 981 997* 1001* 1027 1101 1224* 1226* 
DPOP = Hy 3s0 oie 2057 54 2696 2761 3239 3295 3298 3301 3304 3307 3310 3313 
DSAVE 007654 925* 947* 12054 
DSAVE1 007656 921* 949* 12064 
DSAVE2 007660 1128* 1130* 1 1163 1180 12074 
DSAVE3 007662 1129" 1131" 1158 1166 1188 12084 
DSPLA 007676 277 283 297 303 308 314 320 342 351 354 431 475 481 
490 507 519 531 543 570 599 620 705 710 714 729 734 
738 756 765 774 782 804 817 820 834 837 840 843 882 
887 892 897 901 0 938 943 1033 1071 12228 


91 
DSR 001266 44a 121 136 995 1028 


- — 


I + 
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CZVSDC.P11 11=SEP=79 09:01 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0112 
DSREL 001274 478 
DSR1 001276 484 979* 993 1029 
DSTOP = 173400 2164 425 464 645 801 866 930 1395 1482 1741 1990 2007 2042 
cease 2151 2201 2218 2234 2251 2268 2298 2337 2362 2372 2470 2582 


2724 3060 3271 3289 
69 


DSWR = 177570 184 30 

ECHJMP 024724 1064* 1086* 1092* 30784 

ECHOFR 624564 wos eee OG Femme 1.23 ~~ ~ F0GGM~ 2 oe ee 

ECODEV 024722 1055* 1056* 1097 30774 

EDGEO = 176040 2474 248 

EDGE1 = 176060 2484 

EMTVEC= 000030 184 

ERRVEC= 1 69* 332i* 

FILE 010010 1223* 1224 12494 

FILEGA 516 648 7024 721 

FILLIT 462 663 667 6844 

FIL14A 005550 869 8794 

FIXVCT 1666 95 974 9 

0 010176 279 13214 1397 

FRME1O 016134 819 21914 

FRME11 016412 836 22074 

FRME14 017250 884 889 894 899 22884 2300 

FRME16 022224 940 27694 3062 

FRME17 024754 968 982 997 30924 3274 

FRME2 012472 344 353 14894 1743 

FRMES 013522 483 17484 2 

FRMES 634 784 21004 2154 

FRME6 16062 803 806 21644 

FRM10 8=017150 822 839 22384 2253 

FRM11D 016700 22278 236 

FRM11M 017210 84 22554 2270 

FRM11S 016672 845 22244 

FRMI14A 017254 880* 885* 890* 895* 22904 

FRM14B 017256 881* 886* 891% 896* 22914 

FRM16B 022450 934% 935* 1176 28204 

FRM16C 022614 2821 28464 

FRMI7E 025426 1035 32774 83291 

FRM17F 025424 985 32744 

GNS = keexee 2 

GRAPH 017362 912 23044 2339 

GRAPHX= 120000 1644 2332 3152 

GRAPHY= 124000 1654 2316 3162 

GRPINC 017406 909* 913* 914 23154 ae 

= 000777 2574 418 419 420 421 422 423 424 
HITCNT 007652 933* 1174* £1175 12044 
007664 84* 135* 148* 150* 12094 3321 

HT = 000011 184 =! 

INCR = 000100 2294 909 914 2315 3147 

INTX = 2534 301 372 6 399 410 417 418 419 420 421 422 423 
424 442 450 454 462 788 797 872 1111 1196 1403 1405 1407 
1409 1411 1413 1415 1417 1419 1421 1423 1426 1428 1430 1432 1434 
1436 1438 1440 1442 1445 1447 1449 1451 1453 1455 1457 1459 1461 
1464 1466 1468 1470 1472 1474 1476 1478 1480 1492 1494 1496 1498 
1500 1502 1504 1506 1508 1510 1512 1514 1521 1523 1525 1527 1530 
1532 1534 1536 1539 1541 1547 1549 1558 1560 1562 1564 1567 1569 
1571 1573 1576 1578 1582 1584 1593 1595 1597 1599 1601 1603 1605 
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1607 1624 
1640 166 
1724 
1787 


& 


0 00 00 CO 
SSS 
—*—0o ONO 
—— 
SIN 
—-oony 
Com ore 
0009 SII IOS 
W—oc— 
SERey 


00 00 00 00 Co SI ION O% 
NS HOM Ws 


So og aT 
OWO NW 
bad ty teterh Py 
NSN 
CO 00 00 02 00 CD 
Ooauwns 
coco 
333 
WONWO 
eed eed ed = = =) =) 3) —— 
Goo 
won 
on 


— I I VS’ I IV SS I = = SS = 


eed et ed ed od od od 


\O 0 00 CO 
wing 


Se ee ee ee 
‘0.0 10 CO 
ow 


AONS-COUirv 


SALS 


NOR 2 RR 
000 
wn— 
COW 


B2E 


sass 
Sssss 


22999 
EX 
S 


INT7 3600 
LOTVEC= 000020 
000040 





CZVSDC _VS60 VISUAL oie te. TEST 
P=79 09:01 


CZVSDC.P11 


LPOFF = 000100 
LPON = 000140 
LPRTA 022346 
LPRTC 022416 
LPVCT 001322 
LPVCT1 001324 
LQ6 = 

M = 0001 
MAXMUX= 000177 
MAXX = 001777 


MAXY = 001777 


MINSUY= 000100 
MINUSX= 020000 


MINUSY= 020000 
022344 


OF FST3= 0 
OFFTST 015220 
OFFT1 015222 
OFFT2 015224 
ORELPT 021340 
PATHO = 002000 
PATH] = 

PATH2 = 012000 
PATHS = 016000 
PATH4 = 022000 
PATHS = 026000 
PATH6 = 032000 
PATH? = 0 
PCERR 006612 
PENOFO 022454 
PENOF1 022534 


MACY11_ 30G6(1063) 


K e 
17=SEP=79 08:50 PAGE 


CROSS REFERENCE TABLE == USER SYMBOLS 


3104 


3108 


3112 


3251 


19954 
525 
541* 

2200 

2200 

2217 

2200 


45-5 


542* 

549 
2233 
2233 


2709 
3180 


565* 
566* 


2707 
2708 
3178 


19964 
19978 


3174 
3176 


SEQ 0114 


@ 


. 
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CZVSDC.P11 11-SEP-79 09:01 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0115 
022504 1147 28264 
NON1T 022564 1139 28324 
PICSCA 020320 487* 494% 26578 
PICSCS 017756 492 23784 
PICSTO 012556 365 15174 
PICST1 2606 367 15304 
PICVTA 017736 370* 384* 23674 
PICVTB 017740 371* 381* 385* 395* 23684 
PICVIC 017744 372* 382* 386* 396* 23704 
PICVTE 017750 377 391 23720 
PICVTIL 017734 375 389 23664 2374 
PIRQ = 177772 184 
PIRQVE= 00024 1 
POINT = 114000 6 398 & 413 469 609 630 59 926 1321 1402 1491 1517 
1554 1588 1620 1652 1658 1664 167 167 1700 1705 1710 1715 1720 


PRO = 184 4 
PR1 = 00004 184 
PR2 = 000100 184 
PR3 = 000140 184 
PR4 = 000200 184 
PRS = 000240 184 
PR6 = 000 184 
PR7 = 000340 184 
PS = 177776 184 
PSW = 177776 184 966* 1227* 

PWRVEC= 000024 184 
RELATP= 130000 1674 168 864 1110 1691 2294 2690 2952 2965 2978 2991 3004 3017 

3030 3043 3138 

RESTAT 001520 70# 1046 
RESUME 007716 576 1169 12264 1235 
RESVEC= 000010 184 

TB 2030 93 1174 
RET14 007242 918 11274 
ROTCHR 021356 618 27024 
SECDLY 2434 306 311 317 3294 
SHIFTO 007650 1065* 1085* 1087 1091* 12014 
SHORTV= 104000 1614 862 1691 2292 2296 3123 3125 3127 3129 
SHOWCH 025252 3211 32224 

017464 2318 2320 2334 2336 23454 

SPACE 004500 642 664 6934 
S 005214 790 799 8084 
SRERR 006614 1028* 10404 
SRIERR 006616 1029* 10414 . 
STACK = 001100 1 3 
STATE = 176000 2424 244 247 


STATSA= 170000 2154 217 640 643 661 665 755 764 773 2034 2038 2062 2730 


‘ial . 
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CZVSDC.P11 11-SEP-79 09:01 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0116 


2745 2757 2760 3069 3207 3216 3267 3281 
2315 3147 


666 6714 
322 23584 2364 


12334 


184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 
184 


773% 776 20624 2082 
SYNSPD 20854 
SYNTXT 018464 
$30 030063 
$40 





CZVSDC _VS60 VISUAL DISPLAY TEST 
79 09:01 


CZVSDC.P11 
TABA 010074 
TABB 012230 
TBITVE= 14 
TEMPA 007672 
TEMPB 007674 
TIMEVT 001326 
TKBVCT 001260 
TKBVT1 001262 
TKVEC = 

TMEVT1 001330 
TPVEC = 
TRAPVE= 000034 
TRTVEC= 000014 
TSAVE 007 
TST1 002250 
TST10 }§=—. 003372 
TST11 = 003404 
TST12 003460 
TST12A 003722 
TST13 004070 
TST14 004116 
TST15 004202 
TST16 =©004712 
TST17 005054 
TST2 002262 
TST20 5 
TST21 005232 
TST22 005316 
TST23 005442 
TST24 005714 
TST25 005750 
TST26 162 
TST27 700 
TST3 002274 
TST4 002470 
TST5 002516 
TST6 002554 
TST7 003156 
VCTROO= 154020 
VIEW 007650 
VSCONS 001306 
VSTERM 001314 
VSTRT 020 
WHERE1= 000265 
WHERE 2= 

WHY 025450 
WHYO 25462 
WHY1 025516 
WHY2 025562 
WHY3 025626 
WHY4 025672 
WHYS 025712 
WHY6 25734 
XDOFF 001300 


291 
285 


12814 
14014 


3350 


573* 


MACY11_ 30G(1063) 
CROSS REFERENCE TABLE == USER SYMBOLS 


346* 
725* 


1068* 
94* 


119 


588* 


N O 
17=SEP=79 08:50 PAGE 45-8 


350* 
742* 


1069* 


124 


2379 
3263 


21584 
1020* 


592s 


358* 374* 379% 388* 393* 
816* B25* 833* 848* 879* 


127* 129 131 146 154* 


2453 = 2457 2469 2637 2641 
3268 


2160 : 
1022* 1024"  3287M 


SEQ 0117 


488* 495* 597* 
904* 12124 


12104 


2644 2647 2650 


8 
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CZVSDC .P11 11-SEP-79 09:01 CROSS REFERENCE TABLE == USER SYMBOLS SEQ 0118 
XPOS porece 4 1128 
xQ6 == 00055 16974 1701 1706 1717 1716 1721 1726 1731 1736 
YDOFF 001302 504 568* 5748 589* 593« 
YPOS 00127, 4 1129 
YO6 == 00100 16984 1702 1707 1712 1717 1722 1727 1732 1737 
SAPTHD 001000 Peey 
SAUTOB 001134 304 
SBASE 001246 304 71 
SBDADR 001122 30" 
SBDDAT 001126 30" 981* 983 986 1127" 81133 1137 1141 1145 1153 1161 
$CDw!1 001252 304 
SCDW2 001254 304 
SCMTAG 001100 304 69 
$cm1 = 000002 304 
$CM2 = 000004 304 
ScM3 = 000002 30" 
SCcPUOP 001220 30" 
SCRLF 001167 304 
SDEVCT 001202 304 
SDEVM 001250 304 
SDOAGN 006674 10464 
SENDAD 006664 7 10464 
SENDCT 006650 69 10464 
001212 304 
SENVM 001213 304 
006620 1005 1037 10464 1082 
SEOPCT 006642 69* 104 
SERFLG 001103 304 3321* 
SERMAX 001115 304 3321 
RRPC 001116 304 
SERRTB 001256 304 
SERTTL 001112 304 
SETAPL 001212 304 
SETEND 001256 29 304 
SFATAL 001174 304 
SFILE2 025346 32444 
SFILLC 001156 304 
SFILLS 001155 304 
$GD. 001120 304 
$GDDAT 001124 304 982* 983 985* 986 
$GET42 54 10464 
$SHD = 12 
SHIBTS 001000 294 
SICNT 001104 304 
SINTAG 001135 304 
SITEMB 001114 304 
7 001170 304 
SLPADR 001106 304 69* 430* 3321* 
SLPERR 001110 304 
SMADR1 001224 304 
SMADR2 001230 304 
SMADR3 001234 304 
SMADRS4 001240 304 
$MAIL 001172 29 304 69 3321 
SMAMS1 001222 304 
SMAMS2 001226 30" 


C 10 
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geggsase - 


88 


2894 3404 3494 . 3614 437# 4804 4854 5024 5964 
7864 8144 8304 8574 9084 9174 9554 10544 


1046* 


69 275 
625 748 


2894 327 
7814 7864 


—— 
Saaa 
Onn 


S8ssssss 
BR 


moO 
par er 


122 1046 1225 13814 


274 298 304 69 
13934 2717 3321 33220 





CZVSDC _VS60 VISUAL DISPLA 
11=SEP=- 7 19 0 


CZVSDC P11 


eeveeee 


—N™ 

Now 
oo 
— 


“N 


VSVSLSS“eeeevE 


a 
& 


7 
286 


8a 
34 
84 
84 
84 
34 
84 
84 
84 
7# 


N 
N co 
OO? WW eS SP OS 


S-Slee 


2601 
2755 
2737 


Y 


TEST 
1 


’ ‘ 
MACY11 30G(1063) 17-SEP-79 08: 


50, PAGE 46 


CROSS REFERENCE TABLE == MACRO NAME 


2635 


2673 


2684 


SEQ 0120 





CZvSOC _vS60 "i SUAL_ DISPLAY TEST 
CZvSOC.P11 11-SEP-79 09:01 


1046 


3321 


1 
8 
eeeeeeeey | 


- ABS. 026250 000 CON RW 


ERRORS DETECTED: 0 


CZVSDC ,CZVSDC/CRF =CZVSDC 
RUN-TIME: 27 13 1 SECONDS 
RUN-TIME RATIO: 111/43=2.5 
CORE USED: 26K (51 PAGES) 


MACY11 30G6(1063) 


E 
17-SEP-79 08: 50 PAGE 46-1 
NAME S 


CROSS REFERENCE TABLE == MACRO 


REL 


SEQ 0121 


